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mejores juegos de 
la historia para 
Amstrad se ban 
hecho usitndo una 
tccnica llamada 
Fihnatimi. 
Dcsvclamos todos 
sus socretos. 



Probantos un programa, cl 
Animator , qtte mucstra basta donde 
se puede llcgar grafieamcme eon un 


CPC. 


Recopilamos todos los 
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.El mejor software de 
CAD/CAM resulta qut' se Juice en 
Espaiia. Veatl si no el analisis de! 
inerrable sisu-tna Ihtnuulo Dilas 3D. 
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Todas las tcniicas para 
crcar imagenos tridimcnsionali's t*n 
un CPC dcscritas past) a past*. 
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Impresoras en color: 
un lujo necesario 

l J n ordenador sin impresora es como un jardin sin flares. Es, sin duda, 
uno de los pcrifericos mas importantes del ordenador. Y no es precisamente 
algo barato. Quiza por esto, y tamhien porque las necesidades de los usuarios 
vanan mucho segun el uso que le vayan a dar, existen muchas tecnologias 
diferentes de impresora que se pueden conectar a los mismos ordenadores. 


Por Fco. Javier Barcelo Taboada 


a NEC Pinwriter 

CPi7 es una impresora 
matricial, de alta calidad que 
incorpora el color y es 
compatible totalmcnte con el 
Amstrad PC. 

Es francamentc curioso 
observar esta impresora 
cuando esta escribiendo rn 
colores. La cinta dispone de 
cuatro franjas. de colorcs 
negro, azul, rojo y amarillo, 
parecida a la de las maquinas 
de escribir. Con estos rolores 
la NEC es capaz de 



La NEC Pinwriter CP7, totalmente compatible con el PC, puede imprimir hasta en ocho colores. 
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reproduce ocha colores 
diferentes, cuatro de los 
cuales son los antcriorcs, y 
los otros cuatro para los cjuc 
da dos pasadas a cada Iinea, 
cada ana con un color 
difercnlc, con lo cua? sc 
Iogran orros cuatro. Dc csta 
rnanera textos y dibujos 
resultan bastanlc mas 
atraclivos cle lo habitual. A1 
escribir, la impresora bascula 
la cinta seleccioriando asf 
unos u orros colorcs. 

A csta curactenstica hay 
quc anadirle una cabcza dc 
impresion dc 24 pumos quc 
proporciona una calidad 
francamente notable, y una 
vcloddad maxima dc 216 
caractercs por segundo cn 
calidad normal, vclocidad 
francamente alia. 

Lit impresora vicne 
configurada para cargar 
automatiramente hojas 
sucltas dc papel, v la 
acompana un voluminoso 
tractor para papel continuo, 
quc sc puede quitar cuando 
cstc no sc csta usando. La 
instalacion del mismo resulta 
sumamente sencilla y cs una 
operacion quc no lleva ni un 
minuto. 

Dispone dc un conmutador 
por cl quc sc puede elcgir cl 
modo dc impresion 
silcncioso, quc reduce d 
ruido producido en tres 
decibelios, detalje dc 
agradcccr aunque la 
difcrcncia no sea notable. 

Aparte de la sclcccion por 
prograrna, cl tipo y tamaho 
dc letra sc puede scleccionar 
con un conmutador dc la 
propia impresora entre 11 
fuentes diferentes quc 
incorpora. Adcmas, 
incorpora caractcrcs grfificos 
obteniendose una salida dc 
los piogramas dc dibujo 
francamente dc calidad. 
Tambicn sc pueden 
scleccionar juegos especiales 
de caractcrcs entre los de 12 
patscs dislintos. 

Gorfio medida de 
seguridad, la impresora 
incorpora un sensor dc 
temperature en la cabcza que 



3D Sample Drawing 
litoCAD bp, AutoDesk., 




I ric. 

; □ 
^ 23 



Una dc sits principalis caractrrislicas cs la aha calidad dc impresion quc con si quc. tan to 
cn lc.tras canto cn dibujos. 
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IfflRA TIPO STANDARD 10 CPI PCNT 1. 

LETRA E3MSAIMCHAJ3A DOBLE 

LEi'KA ENSANCHADA TRTPT.F 

imwimvmaL 

LETRA 2x VERTICAL 2x HORIZONTAL 

LETRA 2x VERT- 3x HORJZ 


a) alcanzar esta una 
tcmperatura de 90 grados 
selecciona automiticamente 
la cscritura en una sola 
direction, v si aun asi la 
temperatura se elcva por 
encima de los 105 grados la 
para totalmente hasta quc 
esta se enfna, alargado asi la 
vida util de la misma, que 


esta esrimada por el 
fabricante en unos 200 
millones de caractcres. 

Tamanos y tipos dc Ictra 

La varicdad dc tamanos 
con los que imprime es algo 
mas atnplia de lo habitual. 


Apartc dc los tipicos 
comprimido, cnsanchado, 
subindiccs y superfndiccs, 
incorpora opt tones de triple 
ancho, doble altura y doble 
grosor pudienclo cstos, 
tide mas, eornbinar entre si 
para obtener ef’ectos de gran 
t alidad y estetica. 

Ln cuanto a los tipos dc 
letra, cl habitual tipo 
cstandar y el de cursiva, 
pudiendose scleccionar la 
calidad. Por cierto, que el 
modo dc alta calidad obtiene 
un rcsultado excepcional quc 
no envidia a muchas 
impresoras dc margarita. 

En cstc apartado la 
caracterfstica mas intcrcsante 
cs la dc poder elegir cl tipo y 
tarnano de letra desde la 
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JNota importante: Los dibujos de este articulo, nuracrados del 
1 al 4 ban sido cxtrafdos del progrania AutoCad, tambien ana- 
lizado en el presente numcro, y volcados cn papel usando la im- 
csora NEC Pinwritcr CP7. 


propia imprcsora. Esta posee 
un display y un boton 
Uamado font, de rnanera que, 
segun cl niiinero 
seleceionado, la imprcsora 
escribe, sienipre que cl 
programa no mande otra 
cosa incompatible, cn cl 
niodo y tarnano sclcccionado. 
Hay que cspccificar lo de 
compatible porque si sc 
sclccciona, por ejernplo, cl 
rnodo de doblc anclio cn la 
imprcsora, y sc escribe un 
texto cn cl que algunas (rases 
vayan a doblc ancho que el 
resto del texto, con lo que no 
se lograna cl cfecto dcscado. 
Pcro cs una facultad 
realmente comoda en muchos 
programas estandar, que 
rcalizan las salidas a 


imprcsora en calidad y tipo 
de letra normal, por si cn 
algun momento se desea 
obtener listados de rnanera 
distinta. 


Papel 

La imprcsora admite hasta 
original y tres copias. 
Naturalmente his copias no 


LETRA TIPO STANDARD FONT 4. 

I f 1 R /\ L M - .ANCI IAIMA r •O£5 L_ El 

1 —e:~r F? a eimsaivjomada tf? r f=»i_ e: 

LETRA ENSANCHADA VERTICAL 

LETRA 2x VERTICAL 2x HORIZONTAL 

LETRA 2 x VERT. 3 x HORIZ. 
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Volcadn dr un disc no de Gem Draw. 


ficha tecnica 


[mprcsuia NEC, modelo ri™,|r CP7. 
Alinicntacion pbr fnccion lraL 
Velocidad: 

Alta calidad, 60 cps. 

Calidad media, 180 cps. 

Calidad normal, 216 cps. 

Sonoridad: 

Normal, 56 Db. 

Silencioso, 53 Db. 

]ucgos de caracteres: 

ASCII Standard. 

IBM Graficos. 

12 juegos espccialcs dc parses. 

Relolucidn graftca de 360 x 360 dpt. 

CabezA^OO millones de caracteres. 
Cinta 3 millones de caracteres. 


salon cn color y, adenitis, 
hay que tcner cn cucnta quc 
si alguna parte de la 
imprcsion va cn un color quc 
necesite dos pasadas por la 
misma linea, en las copias 
esta parte salclra mas oseura 
que cl rcsto. 

Adrnite papel continue 
incorporando un voluminoso 
tractor, que no obstante sc 
ins tala y clcsinstala cn muv 
poco tiernpo. Y una 
caracterxstica interesantc es 
quc este tractor es 
bidircccionaJ, lo quc permite 
tanto av-anzar come 
retrocedcr el papel. 

El sistetna dc alimcntacibn 
dc hojas sucltas que 
incorpora es muy similar al 
de la irnpresora clc los 
Amstrad PCW. Sc introduce 
cl principio de la lioja en su 
ranura y se situa la palanca 
e earga en la position 
nterrnedia, con lo que este 
sc carga automaticamcnte y 
cjueda listo para funcionar 
con solo retornar la palanca a 
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Las impresoras a color constituyen 
una irresistible tentacion para todo 
aquel que pretenda presentar 
documentos e informes con una 
calidad profesional 



su posicion original. En las 
prucbas hechas, el 
funcionarniento resulto 
excelente, no siendo 
necesario ajustar las hojas 
manualrnente ninguna vcz. 

Color 

La impresora puede 
imprimir en ocho colores 
difcrentes. Dcsde Basic es 
facilmcnte prograniable con 
la habitual instruccion 
LPRINT sin ofrccer ninguna 
dificultad. A la hora de 
dibujar, para rcalizar dibujos 
en color el programa que sc; 
utilice dcbc prever la 
instalacion dc csta impresora, 
o de una de tipo muy 
similar. 

Otras caractcnsticas 

Aparte de sus propios 
juegos dc caractcrcs, la 
impresora dispone de una 
zona de su rnemoria domic 
se puede cargar otro tipo 
creado por el usuario o que 
aconipane a algun programa. 
En cste momento, este juego 
de caractcrcs entra en vigor y 
permanece hasta que esta se 
apaga. 

Conclusion 


Las prucbas rcalizadas con 


esta impresora han sido 
francamentc satisfactorias. 
Particularmente, la calidad 
dc la lctra rcsulta 
excepcional. Viene 
perfect amen te equipada, 
aunque los manualcs sean en 
ingles y falte inforrnacion 
sobre determinarlos aspectos, 


particularmente sobre cdmo 
configurar las opciones de 
color en modo grafico. 

A pesar dc esto, es una 
impresora rapida, dura y 
muy coinpleta, quo nos ha 
causado muy bucna 
impresion, nunca rncjor 
dicho... 
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The Animator, graf 

icos que cobran vida 
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Pot Victor Prieto 

Todos los programas de diseho grdfico que podemos encontrar en el 
mercado hacen lo mismo: solamente sirven para dibujar (cosa nada 
extraha, pues es para lo que ban sido creados). En ellos podemos 
incluir texto, diferentes colores, superficies con texturas, rectas, cure as, 
etc, pern el resultado es siempre el mismo , una pantalla almacenada 
fA metnoria. 


r 

>.. oilscientcs de la escasez dc software 
distinto-para los usuarios de Amstrad, la casa 
Discovery entra de llcno en uno de los campos 
mas apasionantes del diseno elcctronico: la 
anirnarion de imageries por ordenador. 

En terininos generales la anirnarion consiste en 
la rapida sucesion, ante nucstra vista, de 
imageries, consiguicndo de esta forma la 
scnsacion de movimicnto (efecto utilizado desde 
los albores dc la ciencia cinematografica para 
hacer que una serie de fotogramas cobre vida). 

En una primera aproximacion, el problcma dc 
la animation podria solucionarse dibujando una a 
una las imagcncs a someter al proccso dc 
animacion y luego pasarlas rapidamente. 

Para trasladar estn al ordenador, tendnamos 
que dibujar en pantalla cada una de ellas e ir 
almaccnandolas en distintos bloques de memoria, 
de forma que, al querer ver la secuencia 
complcta, esta pasara por la pantalla a gran 
velocidad produciendo la scnsacion de 
movimicnto. 

Sin embargo, el software lo hace todo rnucho 
mas facil. La animacion generada por ordenador 
simplifica de forma drastica el proceso a realizar: 
nosotros solo ponemos la imagen inicial y final, 
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gencrando el ordenador todos los fotogramas 
intermedioS que format! la secuencia de 
animacion. 

Esta cualidad de gcncrar las imagcncs 
intermedias, cs la que hace que los programas de 
animacion faciliten extraordinariamente la labor 
dc los disenadores, consiguicndo efectos dc 
movimicnto verdaderamente logrados en cuestion 
de rninutos. 

The Animator incluye dos modulos bicn 
diferentes en su funcion. Sc podria decir que 
tenemos dos programas simultaneamente en 
memoria. El primero de ellos esta dedicado al 
dibujo de las figuras, y el segundo, que da 
nombre al programa, es cl que contiene las 
rutinas dc animacion. 


Antes dc dotar de animacion a cualquicr 
forma, hemos de tener las herramientas 
necesarias para crearla, en estc sentido el 
programa nos facilita una completa gama dc 
comandos quo nos permiten dibujar toda clase de 
formas geometricas. 


El modulo de dibujo. 
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Llegado este punto, hemos de aclarar, para los 
aficionados a la programacion de juegos, que el 
programa de dibujo esta disenado pensando 
primordialmente en la ejecucion de dibujos 
geometricos: poligonos, figuras de tres 
dimensiones, estructuras lineales de solidos, etc., 
cjuedando f'uera de sus posibilidades la creacion 
de personajes para juegos. 

The Animator trabaja en tres modus de pantalla 
diferentes: El modo 0 ofrece una resolucion de 
320 x 136 pixels con dos colores distintos, el 
modo 1 tiene 640 x 136, tambicn en dos colorcs, 
y el modo 2 presenta una resolucion dc 320 x 136 
puntos con cuatro colores. 


Animator da todo tipo de 
facilidades para girar 
objetos. 


La pantalla de dibujo contiene un area de 
informacion en su porcion inferior, en la que se 
confienen todos los datos referentes a la imagen y 
secuencia de animacion en la que nos 
encontrainos, en esta se nos indica la figura que 
estainos tratando, la opcion de trazado empleada, 
la cantidad de memoria disponible, el modo 
comando en curso, etc. 

El movimiento del cursor en pantalla puede 
realizarse con joystick de tres velocidades 
distintas: velocidad de crucero para 
desplazamientos medios, superrapida para 
grandes longitudes y lenta para dibujo de 
precision. 


the,M, m ! SL [ ? r 



quedara trazado. Figuras de mas de 15 lados 
daran como resultado circulos, sienclo estos mas o 
menos perfcctos en luncion del numero dc 
segmentos seleccionados. 

El borrado se realiza linea a linea. Puede 
elegirse cualquiera de las trazadas, siguicndo un 
metodo de numeracion, que reproduce el orden 
en que aquellas ban sido trazadas en pantalla. 

No existe opcion de borrado de puntos, o trozos 
de linea determinados. Esto hace dificil el dibujo 
dc figuras no geornetYicas en las cualcs cada 
punto tiene cntidad propia y no forma parte de 
una ley geometrica. 


Funciones especiales, 

Una opcion nueva cn este programa es el 
trazado de curvas multiformes, su uso permite 
dibujar una linea de pantalla punto a punto con 
trazado curvilineo, que podemos someter a ciertas 
modificaciones. Trata cada punto como segmrnto 
distinto, reduciendo o aumentando, segun 
nuestro gusto, el numero de los mismos. De esta 
forma, podemos conseguir suavizai el contorno 
de la curva, o hacerlo mas abrupto al reducir el 


Dibujo de rectas y poligonos 

Dado el caracter meramente geometrico del 
modulo de dibujo, el trazado de rectas puede 
realizarse de dos modos diferentes: en cl modo 
individual, fijarcmos los puntos de los extremos. 
En el caso de que lo que tengamos que dibujar 
sea un conjunto de lineas unidas, el modo de 
encadenamiento nos permite trazar dc forma que 
el pnncipio de la siguiente recta coincida con el 
final de la ultima realizada. 

F,1 dibujo de rectangulos posee una opcion 
especifica, la cual traza el mismo con solo fijar 
los extremos de la diagonal principal. 

El trazado de poligonos dc cualquier numero 
de lados esta contemplado en una funcion 
especial y con ella se puede conseguir cualquier 
figura con un numero de lados comprendidos 
entre 3 y 24. En primer lugar fijaremos el centro 
y el numero de lados, despues el radio de la 
circunferencia circunscrita y el poligono regular 


numero de lados. 

Las superficies pueden ser tratadas por medio 
del rellenado; este se puede rcalizar a base dc 
colores solidos o utilizando las texturas que 
facilita cl programa: puntos, trazos verticales y 
trazos horizontales. La utilizacion de las mismas 
permite la mezcla de distintos colores, ampliando 
la garna de colorido permitida por los distintos 
modos de pantalla. 

Sin lugar a dudas, la opcion mas espcctacular 
y potente del modulo de dibujo es la de 
transformation de bloques. Esta, desconocida 
hasta ahora en cualquier programa de dibujo, 
somctc a un completo proceso de mutation a la 
lorrna original, distorsionandola a rnedida de 
nuestros gustos. 

Realidad y perspectiva se dan cita en la 
animacion gracias a este programa. 
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Con su uso podcmos mover bloques do dibujo 
a lo largo de la pamalla y eopiarlo cn los puntos 
deseados las veccs necesarias. 

La transformation de sus dimensiones permite 
alargarla o acortaila, reducir el eje X o c'l Y, 
alargarlos, girar la flgura 90 grados cn cualquier 
sentido y obtcncr la figura reflejada respecto a 
cualquiera dc los cjes. 

Como plato fucrte, la posibilidad de girar 
punto a punto, con lo cual la ligura original 
pucde scr girada cn sentido horario o antiborario 
con la maxima precision, obteniendo imageries 
rotadas, pocos pixels respecto a la anterior. 

Modulus dc animacion. 


Antes de rcalizar la animacion dc una figura, 
al menos hemos de tener dos imageries 
gcncradoras. Una vez pucsto en marcha el 
proceso de animacion, el programa generara las 
figuras intermedias entre las definidas 
antcriormentc. 

The Animator puede contener simultaneamcnte 
24 secui ncias distintas de animacion en rnemoria, 
cada una de las cuales puede ser grabada o 
cargada en disco o c.inta. Existen (res formas 
distintas de. grabacion: 

—Modo Data, en el cual son grabados los datos 
dc cada una de las figuras que componen las 
imagencs fuentc de la animacion, como son: cada 
llnea dc la rnisma, el color y los datos 
eorrespondientes a rotaciones y pausas. De csta 
forma, una vez que los datos han sido eargados, 
cl programa ha dc crear cada figura y 
compactarla, 

—Modo Demo, en el que sc graba la totalidad 
dc la secuencia, rciiriendonos a sccuencia como la 
serie de todos los fotogramas que componen la 
animacion. Una Demo funcionara 
instantaneamente y esta concebida para scr 
ejecutada fucra del Animator. 

—Modo Complete, con el cual graham os todas 
las secucncias dc animacion dc la memoria en 
modo Data. 

Para defmii las figuras gcncradoras dc la 
animacion, hemos de claries un numero 


ANIMATION MENU 
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comprcndido entre 1 y 999. Cada vez que 
comcnzamos con una nueva saeuenoia, cl 
programa comienza en la pamalla de edicion con 
la figura numero 1. Podcmos definir hasta un 
maxirno de 27 figuras fuentc. 

Activar una secuencia dc animacion cs una 
tarca automatics. Una vez pulsada la opcion 
numero 6, The Animator genera y compacta todas 
las imageries intermedias representando despues 
la secuencia cornplcta al maximo dc velocidad. 
Esta no parara hasta que no la desactivemos 
pulsando ESCAPE. 

La animacion sc puede cjecutar tambicn cn 
forma inversa, yendo dc la ultima imagen hasta 
la primera; la action tambicn puede ser 
congelada con lo cjue podremos mantener una 
imagen en partial lit y reeorrer una a una las 
formas dc la secuencia. 

En el menu de animacion podcmos gradual- la 
velocidad dc la misma, estableciendo pausas entre 
fotograma y fo to grama con una precision dc 1/50 
de segundo. Tambien sc puede acelerar o 
ralcntizar el paso dc los fotogramas ajustando la 
velocidad entre imagen e imagen. 

Una posibilidad important^ del modulo de 
animacion cs la dc producir giros en tres 
dimensiones de las imagencs gcncradoras del 
movimiento. Estos giros se producer! respecto a 

Podcmos observar un objeto desde 
cualquier angulo a golpe 
de joystick. 

unos supuestos ejes que pasan por cl centre de la 
pantalla. 

La animacion puede rotar respecto al eje X, 
respecto al eje Y o simultanearnente respecto a 
am bos. La cuantta del giro sc expresa cn grados. 

La combination acertada de giros y la 
reproduce]’on cle imageries cn distintos lugarcs de 
la pantalla puede crcar unos cfectos francamentc 
espectaculares, en los que no tenemos mas 
trabajo que el de crear una figura, que 
postcriormcnte modificaremos con la 
transformacion de bloques, consiguiendo las dos 
irriYgenes luente de la secuencia. 

Una ultima sofisticacion cn la animacion nos 
permite definir texturas en las superficies dc los 
cuerpos a tratar. Estc relleno se realiza de forma 
* automatica; de igual forma que ocurre con los 
fotogramas interrnedios, con la particularidad dc 
que hemos de definir una pot una las superficies 
a tratar en la imagen initial y la final. Para ello, 
cl modulo de animacion nos presents por orden 
numerico las dos imagencs, cn las que 
seleccionamos y marcamos las caras adccuadas 
con la textura deseada. Posteriormcntc, el 
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programa compacta una por una todas las 
imagenes dc la serle, ejecutando despues la seric 
completa con las texturas raarcadas. 


Modulo RUN-Timc. 


El objetivo principal de cste modulo cs poder 
reproducir la secucncia de animacion sin 
necesidad de tencr que eargar cl programa, con 
cllo podemos incorporar la animacion creada a 
nuestrus programas y udlizar los efectos 
generados cn el Animator fuera dc sus f’ronteras. 

Ofra ventaja del Run-lime es que funciona dc 
niancra diferente que el Animator. Figuras cjue en 
cste producen un ligero parpadeo cn pantalla, al 
ser cjecutadas cn Run rime, climinan totalmente 
esc elccto consiguiendo un movimiento suave y 
continue. 



Este modulo es una parte separada del 
programa, que se puede localizar cn la direction 
dc memoria deseada. Adeinas, cn cl 6128, utiliza 
los 64 K del sogundo banco de memoria, dejando 
libres 100 K para la animacion. 

Todos los comandos dc este modulo son 
extensiones RSX, cada uno dc los cuales puccle 
ser utilizado dentro dc un program?! Basic o 
dircctamcnte desde cl tcclado, incorporando los 
siguientes comandos: 

(JET, seguido del numero de demo, carga una 
determinada sccuencia en memoria. 

SETCOL, permite fijar los colorcs a utilizar en 
la animacion. 

ANIMATE, ejecuta la sccuencia cspecilicada, 


un numero determinado de voces, a la vclocidad 
fijada cn otro de sus parametros. 

CLEAN, borra dc la memoria todas las 
animaciones existences. 

SHOW, lleva a pantalla una figura 
determinada dc. cualquiera de las secuencias 
contcnidas en memoria. 

Tambien es posiblc incluir texto en pantalla 
con la utilizacidn de una ventana en la parte 
inferior de esta, la cual puede cocxistir con la 
animacion proporcionando tftulos en diferente 
color. 


Memoria. 


The Animator, ticne la habilidad de saber 
aproveehar las Ks dc mernoria extra que 
proporciona el 6128. De esta forma, en los 
modelos 4o4 y 664 el programa rieja libres para 
cl almacenaxiiiento de imfigenes un total dc 17 
Ks. mientras que cn cl 6128 la memoria libre de 
almacenamiento es de 81 Ks. 

La cantidad dc imagcnes que podarnos 
obtencr, depende dircctamentc del numero de 
Eneas que contcnga la figura y del uso que sc 
haga dc las texturas. 

Una sccuencia con figuras dc complicada 
estructura cn cl 6128 puede tencr un maximo dc 
100 fotogramas. Por el contrario, figuras que 
contengan solamcnte dos lfneas pueden 
extendersc liasta 600 imagenes. 

Dcsafortunadamente no existe metodo alguno 
para calcular la cantidad de memoria que va a 
ocupar una sccuencia antes de scr animada. Una 
vez hccho esto, cl contador dc memoria nos 
indicara cl porccntaje dc memoria libre. 

Este contador solamcnte da una idea 
aproximada del estado de la memoria, incluso 
cuando indique que cl 99 por ciento sc encuentra 
lletio podremos introducir algunas imagenes. Una 
vez realizada la animacion marca el cspacio que 
ocupan las imagcnes comprimidas; antes de 
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Animator funciona en todos 
los CPC sin problemas. 

efeetuar esta, solainentc contara e! cspacio 
ocupado por las figuras fucnte e intermedia's dc la 
animation. 

Para resolver los problemas producidos por los 
mensajes dc OUT OF-MEMORY, siempre 
podrernos eliminar algunas de las otras series de 
animacion conteniclas cn memoria, o recurrir a 
acortar cl niimero dc Eneas ocupado pot las 
figuras fucnte, redueiendolas por medio dc la 
funcion do transformation dc bloqucs. 

Instrucciones. 


El programa conticnc un complelo manual dc 
instrucciones cn el que se trata con cxtenso 
detallc cada una dc las opciones del mismo. Para 
su manejo se ha clividido cn ocho capftulos 
ordenados por grade dc dificultad, 
proporcionando un complete entendimiento desde 
sus 1’acelas mas elcmcntalcs hasta las coinplejas 
tecnicas dc animacion. 

El primer capftulo esta dcdicado al aprendi/.ajc 
dc las bases del programa. Paso a paso sc nos 
describe la forma dc crear una secuencia de 
animacion sencilla, primero dibujando las 
imagenes fucnte, luego animandolas y dcspuel 
ahadiendoles nuevas figuras. 

El segundo capftulo sc centra cn la descripcidn 
dc los mentis y las opciones. La tercera parte se. 
declica al modulo de dibujo y a todas las 
posibilidadcs que pone a nucstra disposition. La 
siguiontc trata dc la edition dc las figuras fucnte 



cuntenidas en memoria. Tras ella tenemos la 
animacion dc figuras solidas, las tecnicas 
avanzadas de animacion, el modulo de rutinas 
Run-Time y el snrnario de opciones y comandos. 

Un cornpletisimo manual claro v concise (sin 
olvidar que viene rntegrameme en ingles), con cl 
que podrernos dominar de forma facil y cn pocas 
boras de practical cste programa. 

Conclusiones. 

The Animator, es un programa dc una gran 
potencia unida ;t una increfble Facilidad dc 
utilization, debida ala racionalization v claridad 
de las funciones y mentis que induye. El 
conocimiento dc todas sus posibilidadcs y su 
adecuada utilization requicre varias boras de 
experimentation, tietnpo que despues se vera 
cornpensado por los incr cables eiectos que sc 
pueden lograr. 

El programa de dibujo es sencillo dc utilizar y 
muy complete e idonco para la crcacion de 
pohgonos, toda clasc de figuras geometricas, 
solidos y demas composiciones linealcs, pero no 
para la crcacion dc ftersonajes o pantajlas que 
por su composicion alejada de las formas 


El programa aprovecha el segundo 
banco de memoria del 6128 . 


geometricas entran nctamente en el ckmpo del 
dibujo artfstico. Puede scr muy intcresante para 
crear perspectivas linealcs, por la facilidad del 
trazado para rectas, cn las que luego podrernos 
simular todos los cfcctos tridimensionales que se 
nos ocurran. L'na gran utilidad del sdlo 
Discoverv. 
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imaffen 


perfecta 


Port Victor Prieto 


lo primero que nos Hama ia 
atencion es el cornentario que la 
propia casa pbductora hace de su 
obra: «Un pro grama de grdficos por 
ordenador diferente. En adicion a 
las cldsicas posibihdades de dibujo y coloreado, The Image System 
permite realizar zoom , movimiento, copia , escala, giros y procesar dibujos 
en un espacio de ires dimensiones». 




r 

1 proeesamiento dc objetos on espacio dc 
(res dirnensioncs penilite obtener image.lies 
distorsionadas a partir dc la epic queremos 
procesar. Esta distorsion va desde cl simple efecto 
dc reclucir las dirnensioncs dc la misma liasia 
mayores solistifiaciones, corno son las de haccr 
que la pantalla gire en al espacio, alargar o 
estrechar las figuras y deformar sus vertices hasta 
cl extreme dc doblarla u obtener pianos fugados 
dc la misma. 

Suponganios epic queremos construir una 
composition cuyo tema central cs un cube cn 
perspectivtk en cad a una de cuyas caras se 
encuentra dibujado un ctrculo dc distinto color. 

El cubo presentara tres caras vistas, cada una dc 
('lias correspondicnic a un cuadrilatcro distinto, 
dentro de las cualel sc encontraran tres elipses 
corresponciientes a la imagen cn perspectiva dc 
los cfrculos de color. 

Esta composicion utilizando The Image System se 
resuclvc i'acilmcntc cn apenas 15 minutos. En 
primer lugar dibujaremos cl cuadrado 
correspondicnic a la cara del cubo. Luego cl 
cfrculo inscrito. Con la option de tc.xturas lo 
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rellrnarcmos con un color (life rente a la cara en 
la que cstii contcnido. 

Obtcnida la tigura ganeradora, solo tenemos 
que archivarlft cn rncmOria y proccsarla. Con 
solo dibujar las aristas vistas dc las tres caras del 
cubo cn perspectiva, procesarcmos postcriormcnte 
tres vcces la imagen archieada cncajandola clcntro 
dc los la dps de aquel. 


Trabajando con Image System 



tss importante resattar quo I tic image Systen 
esta unicamente dischado para dibujar cn cl 


i 






















modo dc 16 colores, no existiendo la posibilidad 
de usar los modos 4 6 2 colores. De esta manera 
perdemos en resolution; pero podemos dotar a 
nuestros dibujos dc todo el colorido quc la amplia 
gama del Amstrad permite. 

La venlana dc information esta presidida por 
la carta de colores. En ella se presentan los 16 
colores seleccionados para el dibujo, bajo los 
males una flecha nos senala el quc cstamos 
utilizando en cada rnomento. 

Debajo de la primera carta de colores esta 
situada la correspondiente a los filtros y colores 
transparent, el uso dc los cuales describiremos 
posteriormentc. 

Siguicndo cn orden descendcntc, encontramos 
el indicador dc memoria ocupada, consistente en 
una barra horizontal quc i'unciona de forma 



semejante a los marcadores de fuel, una lmea 
negra creciendo de izquierda a dcrccha en 
funcion dc la cantidad de memoria consumida. 

Despues encontramos la ventana dc mensajes. 
En position normal presenta las coordenadas del 
punto de pantalla cn cl que se encucntra situado 
el cursor. 


Operaciones elementales 

The Image System ha sido disenado para trabajar 
unieamente con el tcclado, no pudiendo dibujarse 
con la ayuda del joystick, corno contcmplan en 
otros programas de dibujo. Para facilitar la labor, 



sc ha buscado la distribution dc las teclas mas 
rational posible, de forma que la mano derecha 
maneja las teclas del cursor y la izquierda queda 
rcservada para la clcccion dc los colores y la 
selection de los cornandos. 

d iene la pcculiaridad dc haber carnhiado dos 
teclas de la mayor importancia. La operation dc 
Escape no esta cn su tccla corno debicra, sino quc 
sc ha llevado a la tecla Tab. Dc forma similar, la 
mayorfa de las operaciories de areptar un 
comando y ejecutarlo, en vez de realizarse con 
Enter, se efectuan con la tecla Copy, quedando 
aquel reservado solamente para la introduction 
de los valores numericos. 

El cambio de color de dibujo se realiza de una 
forma curiosa. Para movernos por las 16 casillas 
dc la carta de colores, tenemos a nucstra 
disposition en la primera llnea del teclado las 
teclas correspondientes a los numeros del 1 al 8. 
Cada vez quc pulsamos una de cllas, el indicador 
de color en curso se situa bajo el color 
correspondiente a los 8 primeros dc la carta. Los 
8 restantes se obtienen pulsando un numero entre 
1 y 8 simultaneamente con Shift. El sistema, 
aunque diferente al utilizado cn otros programas 
no tarda mucho en hacerse familiar. 

Gama de colores 


. La election dc los colorcs a utilizar cn nucstro 
dibujo ha dc realizarse por medio dc la option 
Define Palette, con la que tambien determinarnos 
los 16 colores dc los 27 disponiblcs en cl 
Amstrad; para ello, una vez activada la option, 




















El programa posee una gran 
cantidad de texturas para rellenar 
superficies. 


basta con seleccionar la casilla correspondiente en 
la carta dc colores. En la zona de mensajes nos 
aparecera un numero quc podemos incrementar o 
decrcmentar hasta Uegar al deseado. Una vez 
fijados cl numero y la casilla, un toque de Copy 
los situara en la carta dc colores para su posterior 
uso. D^gja^'inilar podemos fijar el color del 
horde ^w ntre los 27 disponiblcs. 

El I pantalla se consigue gracias a la 

ionf^^^K^TOTt; que permite borrar cualquier 
. dibujo e^Hfite en ella, tinendo la pantalla del 
color indicadi'. AsL el rhismo comando realiz.a 
MfconeJ simultaneas: rambiar el color del 
pabf'iRBiorra* ,1a pantaJla. 


Dibujos geonjjetricos 



rogramas de dibujo, 
geometricas como 
la determinacion de dos 


Como la rna 
este permite dib 
lineas y circulos con 
puntos. 

Draw Lines permite dibujar rcctas fijando el 
origen y el final de la misma. Funciona de modo 
continue), de forma quc al determinar el primer 
punto, de este surge un segmento que sc va 


moviendo con el cursor, permitiendonos ver el 
tamano y posicion de la recta antes de fijar su 
final. 

El dibujo de rectas se realiza tambien de forma 
encadenada, lo que posibilita que dibujemos un 
conjunto de lineas de una sola vez con la 
condicion de que el extremo de una sea el 
principio de la siguiente; mecanismo de gran 
utilidad a la hora de hacer dibujos geometricos, 
en los que la precision a la hora de unir los 
extremos de las Eneas es de suma importancia. 

El trazado de circulos se ejecuta mediante 
Circles , con lo que podemos obtener tambien 
elipses. Para su uso hemos de fijar los dos ejes de 
la misma, construyendo el rectangulo circunscrito 
a la misma. Una vez definido este, una pulsacion 
de Copy hace aparecer nuestra curva. Si en el 
lugar de obtener el contorno queremos que esta 
aparezea rellena, Shift + Copy nos muestran la 
superficie en color del dibujo en curso. 


Ampliacion j texturas 

Como todo programa de dibujo que se precie, 
la opcion de ampliacion debe estar contemplada. 
siendo la eficacia y el tamano de la misma la que 
marca la calidad del producto. 

En este caso se le da el nombre de Zoom, y 
cada vez que se activa la opcion aparece la 
ventana de ampliacion conteniendo la zona de 
dibujo cercana a la posicion del cursor, en una 
superficie de 20 cm podemos ver la porcion de la 
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panfalla elegida aumentada dos o cuatro s-eces, 
en la cual es posible realizar las modificaciones 
neccsarias sob re el trazado original (una 
superficie algo pequena, pero quc sirve para 
rnodrficar las partes necesarias). 

En el aspecto de las texturas, cualquier 
superficie ccrrada por ltneas puede ser rellcnada 
con los distinlos racdios que The Image System 
pone a nuestro alcance. 

Los rcllenos en colores solidos se haccn de 
forma automatica, situando el cursor dentro de la 
superficie a cubrir. 

Los rellenos con texturas especiales se realizan 
de identico mode, pudiendo elegir entre una 
gama dc 10 texturas definidas en el programa. 

La option Define Textures esta dirigida a los quc 
quieran incorporar sus propias superficies. 

Figu ras cn memoria _ 


almacenar en memoria la pantalla complcta coma 
cualquier otra imagen. 

El indicador de estado de memoria nos 
senalara el espacio disponible. Utilizando figuras 
de tamano aproxiinado a un cuarto de pantalla, 
la capacidad dc almarcnamiento es de 3 
imagenes. No obstante, el contcnido dc la 
memoria puede ser transferido a cinta o disco, 
con lo que las tres figuras pueden convertirse en 
cl numero deseado par cada uno. 

Erase Pictures permite borrar de la memoria las 
que consideremos innecesarias o las que nos 
disgusten. 

Imagenes tridimensionales 


For fin llcgamos al plain fuerte del programa, 
la option mas potente y espectacular por sus 
resultados, que liacc cjue The Image System sea un 


Otra de las muchas particularidades de este 
software es la capacidad de almacenar trozos de 
imagenes en memoria. Cunsidera como una 
imagen cualquier area rectangular de la pantalla. 

La ventaja de esta facultad cs que permite 
repetir en una pantalla el contenido de las 
imagenes almacenadas en memoria, realizando 
mezclas y superposiciones sin necesidad de trazar 
una sola linea. 

Para almacenar una imagen en memoria 
utilizaremos el comando Save Picture, cl cual hace 
aparecer cn pantalla dos rectas perpendiculares 
con las que delimitamos dos de los lados del 
rcctangulo quc la va a contener. Lina vez fijado 
estc, aparecen otras dos que nos permiten 
cerrarlo, pasando la imagen acotada a la 
memoria. En el caso mas extremo podemos hasta 


















programa «difereme»: cl procesarnicnto dc 
imageries en trcs dirnensioncs. 

Cualquier imagen contenida cn mcmoria 
(incluso si se trata dc la pantalla complcta) puede 
ser sometida a! proceso tridimensional. El 
desencadcnante del mismo cs el cornando View 
Picture. Con su uso cualquier imagen de la 
inemoria sera transferida a la pantalla de forma 
inslantanca y nos permitira reaiizar su 
transformation. 

Uni vez activada, el monitor nos presently 
centelleante, cl rectangulo que contienc cl 
perirnetro dc la imagen llamada a pantalla. En 
cstc momento podemos empezar su modification 
cstos aspcctos: 

uandola cn cualquier parte tic la 
c las teclas dc cursor. 

s-£n cste apart ado dc la gama 
k giros imaginablcs cn un programa 
SI han conteimplado los giros cn todos 
■orrt pondiente 1 al espacio tridimensional, 
aliza cn intervalos de tres o cuatro 
que 'trddea dr la precision con que 
podemos trata ' las rota<Hones de las figuras 
utilizadas, puoiendo hacerse cada uno en ambos 
senridos: horai 

Los ejes de sta^t^finidos de la 

siguiente forma 

El eje Z es el pi"-**-■ Krlar a la pantalla. 
Cualquier giro cn cste piano hard que la itgura 
rote dentro del piano de la misma sin 
experimental- ningun carnbio cn sus dirnensioncs. 

El eje X corresponds al eje horizontal y el 
electo producido es similar al que se conseguina 
si la pantalla gira.se respecto a su parte inferior 
abatiendose sobre cl piano dc la mesa. 


en cuaj 
Mon 

pant alia 
(hrt 

.-mas-ai 
dt dibu 


Image System permite el procesamiento 
de imagenes en tres dimensiones. 

■■■■■■■■■■■■■■ 

El eje V gira cn cl cspacio segun cl eje vertical. 
K1 efccto producido es similar al de abrir una 
puerta, un lado de la hoja se aleja, mientras cl 
otro se acerca hacia nosotros. 


Escalas y deformaciones 

El conjunto dc giros y niovirnicntos se 
complementa con los cambios de escata. Gracias a 
cstos podemos ampliar o reducir la figura 
procesada, incluyendo cstc proceso algunas 
modiftcaciones com piemen tarias. 

El primer grupo de cambios de escala lo 
constituyen ampliat ion y reduction. La 
arnpliacion puede perfectamcnte rebasar los 
margencs dc la pantalla, mientras que la 
reduccion puede ir desde cl tamano complete de 
esta hasta un conjunto de pocos pixels. El 
segundo grupo afccta solamentc a la altura; esta 
puede ser reducida o aumentada sin afectar cllo a 



la anchura dc la misma, que permancccra 
constante. El terccr grupo hacc lo mismo, pero 
esta vez con la anchura. 

For si estas rnodilicacioncs parecen pocas y 
todavra no sc ajustan a nuestros gustos, Ilcga cl 
«uo Vet mas», Move Point, que permite distorsionar 
cualquier imagen hasta cl punto de hacerla 
doblarse formando superficies alabeadas. 

Coti ella podemos mover cualquicra dc los 
cuatro vertices que delimitan nuestra figura y 
dcsplazarlo respecto a los detnas, pudiendo 
repetir cl proceso con los cuatro, dc scr 
neecsario. 

Combinando esta option con las dc carnbio dc 
escala y rotation, cualquier position de un piano 
en el espacio puede scr rcproducida en pantalla, 
hacicndo que nuestros dihujos cobrcn volumcn y 
prolundidad siguiendo las Icyes dc la perspectiva. 

El unico incoftveniente dc todas estas 
transformacionqs es el tiempo que tarda cn 
generarse la imagen final. Esta se va formando 
lirica a Jmca, tardandn cn reproducir una 
transformation dc la pantalla completa unos tres 
minutos, ticnifto algo excesivo si sc com para con 
otros programas que haccn los cambios 
instantancamcnte (aunque no sean dc cstc 
genero). 


Filtros y transparcncias 


Las anteriores opciones permiten modificar la 
forma dc las imagenes hasta limites insospethados, 
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pc id para su mejor aprovechamientb seria 
nccesariu pocler mezclar varias imageries ya 
transformadas cn la pantalla. 

Define Colour Filters liace posible cambiar los 
colores dc la figura que fenemos en memoria, 
presentandose esta en pantalla con los colores 
preestablecidos. Con csta faceta es facil obtcner 
en pantalla una composicidn a base de repetir 
varias veces la misma imagcn, pero con colores 
distintos cada vez. 

Esto, realizado por las bucnas, produce un 
efccto dcsagradable: al reproducir una figura 
sobre otra, el rectftngulo que conticne a la ultima 
borra la porcidtl que invade dc la anterior, 
perdiendo partes de csta. Para evitarlo, harfa 
lalta algo que nos permitiera superponer dibujos 
sin percler nada.; acjm entran dc lleno los colores 
transparentes. 

Con Define 1'ramparent Colours podcmos haccr 
transjiarcntc cl color o colores dc la imagcn 
grabada cn memoria que postcrionnente dcjaran 
ver lo que hay dcbajo al ser rcproducida esta cn 
pantalla. Dc esta forma climinamos cl fondo clc 
la imagcn para que, al superponer, no bar re lo 
de abajo. 


Program as com piemen tar ios 


Vienc complenienlado con una scrie dc 
programas que prrmiten la utilization dc his 
pantallns y ligtiras creadas con cl disenador cn 
nucstros programas Basic. 

La rutina que reali/.a el Li abajo ocupa un total 
de '216 bytes, y puede ser situada en cualquicr 
localization dc memoria. Su uso permite 
representar una figura en cualqtiier lugar de la 
pantalla, especificando cn un sencillo programa 
cargador la Ilia y colunma del vcrticc de la 
figura. En cl mismo programa jiodtrnos 
especificar los colores transparentes y los filtros 
descados para su visualizacion. 

La segunda rutina sirve para reaiizar un 
volcado de la pantalla por impresora. 

The Image System permite trabajar 
indistintamente con cinta o disco. Disk y Tape 


seleccionan cl periferico utilizado. 

Para grabar sc utiliza la funcion File , que 
grabara en el pcriferico seleccionado en su opcion 
Pictures las imagenos contenidas cn memoria, y 
mediante la opcion Screen, la pantalla en curso. 

La carga de pantallas o figuras funciona dc 
identica rnanera con cl comando Load. 

foclo cl manejo del programa y la dcscripcion 
completa dc sus comandos viene incluida cn un 
manual de 18 paginas cn cl cjuc sc afrontan las 
caractcnsticas y posihilidadcs del mismo en orden 
de dificultad asccndcntc. 

Un cxcclcntc manual con cl cjuc cl programa 
no deja ninguna duda y puede ser utilizado al 
maximo dc sus jiosibilidacles. 


Conclusion 


Nos encontramos, como bien cspecificaba la 
publicidad dc la casa CLR, ante un programa 
«difercntc». En sus puras jiosibiliclaclcs dc 
trazado, comparado con los tlcinas programas dc 
dibujo iesulta un poco inferior, aunque no Ie 
falta ninguna opcion principal. Ortas (Melbourne 
Draw, Art Studio) son rnuchtsirno mas completos, 
con un abanico de jiosibilidades que harian 
pal id ooer a cualquicra. Pcro no hemos dc olvidar 
(juc prccisamcnte la caractenslica que le hacc 
disdftto a todos, el procesamiento dc imageries cn 
tres dimensiones, lc sitria en un piano distinto. 
Las posihilidadcs cjuc aporta esta faceta son 
ignoradas por los otros productos del mercado. 
Los efcclos cjuc jionc a nuestra disjrosicion haccn 
de The Image. System un programa unico cn su 
genera, ideal para reaiizar eolages y disenos 
basados cn dibujos realizados antcriormenU' y 
para la reproduccidn de las mejores imageries 
tridimensionalcs crcadas matcmaticamcnte o 
dibujadas a tnano. 

Auncjuc sus cajjacidaclcs dc dibujo son 
sulicientes, los aficionados exigences' y puntillosos 
con los programas de diseno pueden rccurrir al 
truco de confeecionar los dibujos con un 
Melbourne Draw o un Art Studio y, una vez 
grabados en cinta o disco, procesarlos cn tres 
dimensiones con The Image System. 
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GRAFPAD-5 


Tableta grafica 
para Amstrad P 


El traiamiento y proceso de imageries par ordenador se estd convirtiendo, di'a a di'a, en un gigantesco negocio, 
que muetie una incretble cantidad de millones de... ddlares, por supuesto. 

El caso es que cada vez mas firmas de software y hardware hacen eco de la nueva moda y tratan de 
comerciahzar rapidamente sus productos, autenhcas panaceas del cad-cam a precio de saldo. En esie articulo 
vamos a analizar uno de los aparalos de soft y hard mas prornetedores en el dsficil compromise 

prestaciones/prec io. 


_I^ asicamente, este tipo de «procesadores de 
grafieos» tratan de ofrccer una gran potcncialidad 
de diseno de figuras geornetricas facilitando al 
usuario una seric de o pci ones de tan simple 
acceso como es... apuntar y disparar. 

El sistema es un hibrido de hardware y 
software compuesto por una pequena tarjeta de 
expansion, una tableta grafica y un lapiz. 

La instalacion del «kii» se puede ef'eciuar en 
pocos minutos y no rcquierc conocimientos 
especialcs. 

Siguiendo las instrucciones que acompahan al 
kit (como de costumbre en ingles) se procedcra a 
la instalacion del sistema. En primer lugar se 
acoplara el circuito cn uno de los slots libres del 
ordenador, lo cual no reviste difieultad alguna. 
'Eras ello inicializarernos el ordenador de la forma 
habitual y procedcrcmos a obtener una copia del 
disco del sistema, adaptandolo a la configuracion 
particular del equipo a utilizar. 

Para ello introducircmos cl disco maestro dc 



Los dibujos pueden archivarse y utilizarsr mas tarde, colocan- 
dolos en cualquier lugar dc la pantalla. 


instalacion, al cjecutarlo nos pedira que 
seleccionemos las caractcnsticas del equipo a 
utilizar reforentes a tipo dc monitor (monocromo 
o color), tipo de impresora o plotter, etc., y 
despues de pedirnos que insertemos un disco, 
formateado cl programa maestro, generara una 
copia de utilization adaptada a la configuracion 
descrita. 


Tableta grafica 

Una base de trabajo construida en plastico y 
de dimensiones 30 x 23 cm, y sobre la cual se 
haya dispuesta una lioja proregida contra el uso, 
a su vez con una lamina de plastico transparente 
y en la que agrupadas por «familias» se hayan 
distribuidas tod as las operaeiones posibles a 
realizar, estos grupos de comandos se identifican 
con gran facilidacl al estar coloreados suave pero 
contrastadamente c identiJlcados por su tftu.lo 
generico. Tambien incorpora un teclado 
simplificado, con lo que practicamente hace 
innecesario cl uso del teclado ordinario para 
realizar el diseno en su totalidad. 

La tableta aloja en su interior unos circuitos 
electronicos de los quo parten dos terminales, uno 
de ellos cs el cable de conexion al ordenador y 
que debera scr conectado (con cl equipo apagado) 
a la tarjeta de expansion que anteriormente fue 
acoplada en el interior del ordenador. El otro 
cable csta solidariamcntc unido al «lapiz», que 
nos servira de puntero para seleccionar cada una 
de las operaeiones que queramos realizar. 

El principio dc funcionamiento del sistema, 
basicamente, cs que la tableta grafica lleva en su 
interior un circuito cn forma de parrilla que 
cubre toda la superficie de trabajo y cuyos 
terminales estan conectados a un chip, tambien 
alojado en su interior, de modo que al deslizar el 
lapiz (cjue no es mas que un generador de 
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frecuencias) sobre la superficie de la tableta el 
chip deduce la posicion rdativa del lapiz sobre la 
inf'ormacion impresa transmitiendola al 
ordenador, si sobre esa posicion pulsamos el 
inrerruptor del lapiz, la funcion seleccionada se 
ejecutara. 

Por otra parte, el criterio do dibujo no es cl 
tradicional dc los editores de graficos.en los epic 
se pintan o borran pixels cn pantalli y luego sc 
utiliza corao tal dibujo, sino que el CAD 
memoriza cada uno dc los trazos que se vaya.ii 
realizando tanto cn su localization como en su 
orden de ejecucion, lo cual nos permite 
rctroceder a cualquier paso del diseno y 
recupcrarlo, bien sea para borrarlo, como para 
utilizarlo (copiarlo, girarlo, moclificarlo, etc.). 

Una vcz instalado el Grafpad y obtenida la 
copia de trabajo podernos empezar el diseno. 

Cada vez que utiliccmos el CAD, cste se 
inieializara instandonos a calibrar la tableta, para 
lo cual deberemos scnalar con el lapiz cn la zona 
marcada como SET ZERO y pulsar cl 
interruptor, a fin de que estc conozca la posicion 
relativa dc cada comando. Efectuado esto la 
pantalla del monitor quedara lista para eomenzar 
el dibujo. Una ventana informativa estara 
siempre presente en la parte superior dc la 
pantalla, la cual, adenitis de mostrar los distintos 
mensajes durante la conleccion del dibujo nos 
indicara continuamente las coordenadas dc 
situacion. 

Pero conozcamos un poco la versatilidad y el 
funcionamienfo de las opeiones que lo componen, 
para ello, nada niejor que llevar a cabo la 
realizacidn de un dibujo. En primer lugar, sera 
convenience definir cl tamano del dibujo a 
realizar, para ello disponemas de diferentes 
forrnatos de DIN desdc el A5 hasta cl AO 
(210 x 150 y 1200 x 840 mm, respectivamentc), e 
incluso admitc la posibilidad dc creacion de 
cualquier formate dentro de estas dimensioncs. 
Tambien deberemos selcccionar el tipo de uniclad 
dc medida que queremos utilizar (mieras, 
milfmetros, centimetres, etc.). No obstante, cstos 
valores pueden scr cambiados en cualquier 
momento sin alectar al dibujo realizado. 
Orientandonos por las coordenadas de situacion 
que continuamente nos ofrece la ventana 
informativa iremos seleccionanclo sobre la tableta 
cada uno de los parametros correspondientes a 
cada h'nea, en el siguiente orden: 

• Tipo de lmea, ya c|ue disponemos dc varios 
tipos de lfneas (continuas, dc trazos, de puntos, 
de trazo y punto, etc..). 

• Color de Hneas. 

• Lfnea o figura a trazar: 

— Lmea recta entre dos puntos. 

— Lmea quebrada que va pasando por 
sucesivos puntos. 

— La realizacidn de rectangulos se logra 
indicando como origen cl vertice inferior 
izquierdo y despues el superior dcrccho, con la 



La capacidad de reproducir exactamente, las veces que se quie - 
ra } se ve claramente en esle grafico. 

ventaja de que la figura va formandosc segun 
dosplazamos el lapiz por la superficie de la 
tableta. 

— La realizacidn de circunferencias ofrece 
tres variantes: seleccionando el ccntro y un punto 
de la periferia o bicn definiendo dos puntos 
diametralmentc opuestos o tres puntos cualquiera 
de la circunferencia. 

— El trazado de lfneas curvas se puede 
conseguir de dos modos: definiendo el centro del 
radio y sus dos extremos o bien indicando sus 
extremes y un punto intermedio. 

— Tambien es posible realizar dibujos «a 
pulso» con la opcion croquis, 

Otras opeiones relativas al tipo dc dibujo son 
las de empalmc entre las dos ultimas lfneas 
realizadas o la posibilidad de efcctuar distintos 
rayados de secciones en las figuras, determinando 
para ello la direccion, la densidad y tipo dc las 
lfneas que rcllenaran la zona tndicada. 

El modo texto tambien esta previsto y con la 
particularidad dc poderse especificar cl tamano y 
tipo de los caractercs a usar, ademas podremos 
utilizar cualquier tipo de fuente que tengamos 
archivado. 

Quiza la opcion mas curiosa de todo el CAD 
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puntos de nuestro dibujo obtendremos 
automaticamente una cota que indicara cn 
pcrfectas nonnas de acotado la meclida exacta 
que los scpara. utilizando para ello cl sistema de 
dimcnsioncs previamcnte sclcccionado. 

Cualquicr parte del dibujo puede ser 
selcccionada y archivada eorno «simbolo» y 
uiilizarse, postcriormente, eri cste u otros dibujos 
que realicemos, ufilizando para ello el menu dc 
simbolos que nos perrnitira salvar, cargar, editar 
y moditicar nuestra bibliotcca. 

Para mayor facihdad de situacion del puntero 
sobre el dibujo, disponemos de un par dc 


Grafpad es el maximo exponente 
de la nueva generation de 
equipos de diseno de bajo precio 
y grandes prestaciones 


potentes y efimodas opciones: la «rejilla» y el 
«paso». 

La «reji!la» no es mas que la tipica trama de 
puntos quo cubrira la pantalla para servirnos de 
pauta, el tamano dc su cuadricula puede scr 
deterrninado en cualquier momento, asi eorno su 
activacion o desactivacion. FI «paso», ligado en 
taraano y situacion a la parrilla, hard que el 
desplazamiento dc la tnira se cfcctuc «a saltos» 
por cl entramado, lo cual nos perrnitira una mas 
facil situacion en el dibujo, al igual que la 
anterior option puede activarsc o desaciivarse 
independientemente cn cuakprier momento. 

Logicamcntc, las situaciones de error tambien 
han dc tenerse cn cuenta. Con chstintas opciones 


cquivocada, una posicion erronea e induso un 
trazo reaiizado anteriormente, seleccionando la 
lfnea a borrar, incluso las opciones «siguientc» y 
«anrerior» nos permitiran rccorrer el dibujo cn su 
order) de realizacion para asi modificarlo si lo 
eonsiderasemos necesario, incluso podremos 
recuperarlo si aeto seguido asi lo deseamos. 

Otra Forma de realizacion de iineas puede 
conseguirse a traves del grupo de opciones de 
«coordenadas» en las que dofinienclo los \ alores 
correspondicntcs y cstablcciendo los puntos de 
comicnzo, intermedios o de Final para la figura a 
dibujar cn cualquiera de los sistemas dc trabajo 
mediante coordenadas absolutas, relativas e 
incluso cn sistemas dc coordenadas polares. 

La ampliation dc tamaho de una zona 
particular del dibujo nos ayudara en gran mancra 
a realizar los pequenos detallcs. la opcion de 



El tliseiio de pianos- mdustrialcs se realiza mas cdmodainente eon 
un instrurnento de ayuda como csta tableta. 
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cs la de acotacion, con lo cual tras indicar dos 
puntos dc nucstro dibujo obtcndrcmos 
automaticamcntc urta cota quc indicara ( n 
perfectas normas dc acotado la medida exacta 
quc los scpara, utilizando para cllo el sixfema de 
dirncnsioncs previamentc sdeccionado. 

Cualquier parte del dibujo puecle ser 
scleccionada y archivada como «sfmbolo» y 
utilizarsc, postcrionncnlc, cn este u otros dibujos 
quc realiccmos, utilizando para cllo el menu de 
snnbolos quc nos permitira salvar, cargar, editar 
\ modificar nuestra biblioteca. 

Para mayor lacilidad dc situacion del puntero 
sobre el dibujo, disponeinos de un par dc 

Grafpad es el maximo exponente 
de la nueva generacidn de 
equipos de diseno de bajo precio 
y grandes prestaciones 


potentes y comodas opcioncs: la «rcjilla» y el 
«paso». 

La «rejilla» no es mas quc la tipica trama dc 
puntos que cubrira la pantalla para servirnos dc 
pauta, cl tarnano dc su cuadricula puede ser 
determinado en cualquier momento, asf como su 
activacion o dcsactivacion. El «paso», ligado cn 
tarnano y situacion a la parrilla, hara quc cl 
despkizamiento dc la mira sc cfcctuc «a saltos» 
por cl entramado, lo cual nos permitira una mas 
facil situacion en el dibujo, al igual quc la 
anterior opcion puede activarse o desactivarse 
iridependientemente cn cualquier momento. 

Logicamente, las situaciones de error tainbien 
han dc tenerse cn cuenta. Con distintas opcioncs 


podrernos anular una seleccion dc dibujo 
cquivocada, una posirion crronca c incluso un 
trazo reali/.ado antcriormcntc, sclcccionando la 
Ifnea a borrar, ineluso las opcioncs «siguiente» y 
«anterior» nos permitiran rceorrcr el dibujo cn su 
orden dc realizacion para asf modificarlo si lo 
considcra.scmos necesario, incluso podrernos 
rccupcrarlo si acto seguido asf lo dcscamos. 

Otra forma de realizacion dc Ifneas puede 
conseguirsc a traveS del grupo de opcioncs de 
«coordcnadas» cn las que defmiendo los valorcs 
correspondientes y establcciendo los puntos de 
comienzo, intermedios o de final para la figura a 
dibujar cn cualquiera de los sistemas de trabajo 
mcdianic coordenadas absulutas, relativas e 
incluso en sistemas de coordenadas polares. 

La ampliation dc tarnano dc una zona 
particular del dibujo nos ayudara cn gran manera 
a realizar los pequenos dctallcs. la opcion dc 



El diseno de pianos industrialcs vc realiza mas comodamcnte con 
un instrumento de ayutla como esta tahleta. 
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La gran ventaja de este tipo de 
programas es su interactividad 
permanente con el usuario. 
Grafpad responde de inmediato a 
cualquier accion 


Lfts posibilidades de rotation es una de las opci ones mas potenies del 
programa. 


Los el emeu to s crudales del 


«zoom» cubre con u'cccs^^a nccesidad, sc pue.de 
ntilizar de dos formas di 
ventana C|uc rubra el area a de 
esa zona sera arnpliada al tamano de pantalla, o 
activando la option «zoom» directamcnte, lo cual 
producira un cambio dc tarfiano en proportion al 
factor dc aumento epic haya dcfmido. Eras 
cfectuar los retoques puede retornarse al tamano 
original usando el comando «previo». 

K1 gran poteneial riel CAD sc aprecia al 
udlizar las cspcctacularcs opcioncs dc Copia, 
Rotation, Eseala y Espcjo., todas ellas son 
utilizablcs tanfo para Ifneas en particular, como 
para secciones parcialcs o pantallas tomplet.as. 

Con las distintas opcioncs dc Copia y 
scleccionando la lfnea o zona a ntilizar podremos 
desplazar dc un lugar a olro del dibujo o copiarla 
una o varias veces en distintos sitios. Las 
multiples posibilidadcs dc rotation permiten 
rcalizar cl giro dc Ifneas o scccioncs en valores 
predeterminados dc 90°, sucesivos giros dc 15° 
cn 15° o tambien girar la figura un angiuiC 
cualquicra aunque este sea dc valor fraecnivrrio 
(poi cjcrnplo, 18,32°). 

Dc rnodo parecido funcionan los comandos dc 
Eseala, cstando predeterminados los valores dc 
doble y mi tad dc tamano podremos ntilizar los 
valores de eseala que mas sc nos antojc, scan 
enteros o decimalcs, dc ampliation o dc 
reduction. Cornun a cstos dos grupos dc 
instruccioncs (Rotacion y Eseala) cxistc la 
posibilidacl dc cambios «riinamicos», es decir, 
podemos ampliar o girar un dibujo a tin 


determinado cstado en forma continua segun sea 

r la tablcta hasta 
que mas 

nos mteresc. 

La relacion con la inforniaeiol en disco, 
relatives al dibujo, sc con (cm pi* en el menu 
dibujos mediante cl cual podremos Salvar o 
Cargar nucstros cliscnos o ta*jien realizar 
catalogos, borrar dibujos tv^cdefmirlos. 

Un ultimo submenu *^a dedieado a la 
obteneion tic copias,n->r impresora, lo constituven 
un variado lote d^nstrucciones o comandos 
dedu ados prim ppalmente a la preparation dc 
datos relati^^na la copia a obtener, Desde la 
seleecidn Jpla zona a imprimir a la eseala que 
qucrciqcd’ que sea reproducida, logranclo asf, 

copias al tamano real al que cst.'ibamos 
o a cualquier eseala que estimemos 
o. 

Sin duda, la gran variedad dc comandos v la 
- potencialidacl dc los mismos haccn del Grafpad 
un programa dc diseno asistido por ordenador 
j que facilita, cn alto grado, la realization dc 
dibujos tecnicos. 
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El estandar en CAD/CAM para PCs 


AUTOCAD 


Hay multitud de pro gramas de CAD en el mercado de los 
PCs } pero solo uno puede presumir de ser el estandar: 

Auto Cad. 



ti 


Pur: Fco. Javier Barcelo Taboada 


asta hacc poco tiempo, los programas 
llainados «de dibujo asisddo» solo estaban al 
alcance dc grandes ordenadores. 

Pcro hoy, anadiendolc a su PC 
de Amstrad determinados 
perilericos, puede 
disponcr de la 


version para IBM del Autocad, convirtierido el 
ordcnador en una potenti'sima herramienta de 
dibujo. 

El primer detalle quo hay quc 
recalcar es que Autocad no 
funciona con el 

Amstrad PC sin 
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mas. Para empczar, hay que disponer dc un 
disco duro donde almacenar la informacion que 
contienen sus nueve diskettes. Ademas, 
necesitara instalarle una tarjeta grafica Hercules 
y un monitor de aha resolucion compatible con 
ella, dado que el programa no «reconoce» cl 
entorno operativo de la pantalla dc Amstrad. Y 
para hacer las cosas como es debido, un plotter o 
trazador con el que imprimir los dibujos con gran 
calidad. No obstante, la impresora de Amstrad o 
cualquiera similar, siempre que tenga caractcrcs 
graficos, es capaz de reprodueir con bastante 
aproximacion el dibujo de la pantalla. 

Y ademas de estos dispositivos, si se quiere 
«rizar el rizo» se puede instalar una tableta 
grafica con la que realizar desde copias de pianos 
hasta dibujos a mano alzada. Las posibilidadcs, 
como se ve, son muy grandes, aunque hay que 
pagarlas aparte. 

Autocad puede realizar cualquier tipo dc 
dibujo, aunque naturalmente donde se demuestra 
que es una herramienta poderosa es en cl dibujo 
tecnico. Valiendose de sus comandos se pueden 
realizar dibujos de una precision asombrosa. 

Un programa de este tipo no suele ser facil dc 
manejar. No obstante, para empczar a dibujar no 
hace falta mucho tiempo, aunque naturalmente 
sacarle todo el rendimiento requiere de horas dc 
practica y pacieneia. Ademas, como opcion, 
incluye una version del lcnguaje LISP que 
permite automatizar mediante programas la 
construction o modification de dibujos. 

El programa vicne en nueve diskettes, que hay 
que cargar en el disco duro. bJna vez hecho csto, 



la primera vez quo sc llama al programa, se 
entra automaticamente en e! menu dc 
configuration. En este hay que elegir el monitor 
a emplear, la tarjeta grafica que. sc va a usar, la 
impresora, el raton y la marca dc la tableta 
grafica, si se tiene, igual que cl plotter. 

A la flora dc pensar en el equipo a utilizar, cs 
convcnicnte saber que Autocad puede funcionar 
con dos monitores, usando uno como monitor dc 
dibujo y otro para los mentis de pantalla y 
mensajes del sistema. Ademas, el programa preve 
el ajuste de las medidas tanto on pantalla como 
en los dispositivos de salida grafica. Para olio 
habra que dibujar un cuadrado con cl programa 



El diseno industrial es una de las aplicaciones mas practicas de 
este programa. 
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y lncdirlo con una regia, tamo en el dibujo 
ijnpreso como en la pantalla, dandole sus 
medidas al programa de configuration. Los 
calculos los hace el programa autoriiaucamenic, 
de rftanera que luego las medidas de los dibujos 
quc rcalicc sc ajusten a la realidad. 


Menu principal 

Al cargar el programa. se visualizan primero 
linos mensajes de presentation. ILstos mensajes 
vienen en un tichero llamado ACAD.MSG, que 
sc' puede editar con un procesador de textos, y 
cambiar su contenido al t|ue sc desee, o borrarlo. 

Una vez visualizado esto, aparece el menu 
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principal, que da acceso a las diversas partes del 
programa, Se puede optar por comenzar un 
nucvo dibujo, editai' un dibujo existence, 
imprimir un dibujo por plotter o impresora, re¬ 
configure el sisiema, conipilar un ficliero do 
dcseripcion o ir al menu dc Rcheros y convertir 
un dibujo heeho por una version de Autocad mas 
antigua para que se pueda visualizar con cste. 

Al elegir la creacion de un dibujo, el programa 
pregunta el nombre y le aplica automaticamcnte 
la extension .DWG. Adornas, se pueden emplear 
prototipos para hacer dibujos. Los prototipos 
pucdcri incluir distintas caractciisticas validas 
para varios dibujos. coma nombres predefinidos, 
euadros dc titulos, etc. 

Una \'cz dados estos dates, se pasa a la 
pantalla dc edicion, desde la cuai sc pueden 
tcclear ordenes o bien seleccionar con el niton, 
dentro del menu de edicion, cl submenu u option, 
deseada. 

Menu de edicion 


F.stc menu permite inieiar el dibujo, 
introduciendo la escala y los limites del dibujo 
que se va a realizar, asf como las unidades que sc 
van a emplear (rnilfmetros o pulgadas). 

Ademas dc csto, todas las luncioncs dc 
Autocad sc esiructuran cn 12 submenus, algunos 
de los cuales poscen otro menu mas. 



Con AutoCAD se pueden dibujar eon la misma Jan I id (id rectas 
y curvas. 


Dibujando... 

Para situar los dibujos, cl programa utiliza dos 
ejes dc coordcnadas cartcsianas. Dc csta forma, 
cualquier punto se puede fijar scgiin sus 
coordcnadas. 

Las unidades del dibujo son las dadas al 
inieializar. Permite hasta 14 cilias significalivas, 
incluycndo decimales, y fijar la escala dc dibujo 
que se desee. 

Para facilitar la creacion o cstudio dc un 
dibujo, se dispone dc Zoom, que permite ampliar 



Una vez que se han traztido las lineas del diseno deseado, se pueden variar las medidas o dimensiones. 
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AutoCAD es de una gran ayuda en cualquiera de los campos pro- El menu se maneja a troves del tablero digitalizador o del raton. 
fesionales que necesiten el diseno o el dibujo habitualmente. 



o reducir la parte del dibujo con la que se 
trabaje, Los limites del Zoom son 
aproxirnadamente de 10 billoncs a uno, capacidad 
mas que suficiente. El aumento o disminucion de 
la parte que se ve en la pantalla no iniluye en las 
medidas del dibujo. Estas son siempre constantes, 
segun los parametros que se hayan dado. 

Dado que la precision con la que se puede ver 
un dibujo depende del monitor que sc estc 
usando, cl programa peranitc forzar la posicion 
en pantalla de las coordenadas para que todos los 


puntos coincidan cn la interseccion de las Imeas 
del monitor. Esto no afecta al dibujo a la bora de 
imprirnirlo, pero f'acilita cnormemcnle la 
visualizac.ion del mismo. 

Se puede dibujar, bien indicando por el teclado 
las coordenadas y movimientos necesarios o bicn 
utilizando cl raton para mover cl cursor por la 
pantalla. Adernas, si sc dispone de tableta grafica 
se puede dibujar sobre ella. Este periferico resulta 
de gran utilidad, sobre todo cuando se ticncn que 
copiar dibujos para trabajar con ellos. Con la 
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tableta grafica copiar un piano o uri inapa —pnr 
ejemplo— resulta una labor muy facil. 

En cualquicr fase del dibujo se puedc dirigir la 
salida del mismo, o de una parte dc el, hacia la 
imprcsora o plotter, de rnanera que se pueda 
eomprobar la marcha del trabajo. Adcrnas, se 
puede almaccnar en disco, de rnanera que luego 
se pueda anadir a otro dibujo, o crear uno cn 
base a varios fragmcntos. 

Se puedcn superponer en el dibujo tantas capas 
como haga falta. Gada capa puede poseer un 
color y tipo de Hnca determinado. Con esta 
posibilidad se puede crear un dibujo que sea 
corno esas larninas con las que se ensefia a los 
ninos el cuerpo humano y que ticnen primero un 
csqucleto, encima del cual se ponen larninas de 
papel vegetal con las venas, los musculos, etc. 

Los dibujos llainados prolotipo penniten 
establecer ciertas condiciones comunes a varios 
dibujos, tales como el tarnano, limites, 
coordenadas, modos, etc. y luego salvarlas en 
disco. De esta rnanera, al empezar un nuevo 
dibujo no hay ciue volver a defmirlas. No 



obstante, cstos valores se pueden cambiar, 
editando el dibujo en el momenta que se rlcsce. 

Todo dibujo se puede salvar en modo ASCII, 
de rnanera que pueda ser utilizado por otros 
programas o transmitido a otros ordenadorcs del 
modo habitual. 

Los textos dc los dibujos se puedcn situar de 
rnanera absoluta, en unas coordenadas prefijadas, 
y de rnanera rclativa, segun la posieion del 
dibujo. Adcrnas, se pueden cerrtrar, ajustar e 
incluso poner inclinados. Con el prograrna vienen 
suministrados cuatro tipos de letra. Son letra 
normal, simple, compleja e italica. Adcrnas, 
desde el propio prograrna se puedcn construir 
otros tipos de letra, y delinir cl angulo de 
inclination de las Ictras con rcspecto al dibujo. 

Programas suplementarios 

Sc pueden adquirir por separado los programas 
ADE 1, 2 y 3, que amplrarr las posibilidades del 
Autocad. l.os ires son correlatives, lo que quiere 



El dibujo se puede memorizar y verlo cxwrndo deseemos, entero o 
por partes, incluso una misma zona cambiando el encuadre. 
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El dibujo dc pianos arquitectonicos es una de las malarias en las que eg mas fatal ver las amplias posibilidades del programa. 


dccir que para usar el ADE 2 hay que toner 
tambien el 1, y para usar cl 3 hay que toner cl 2. 

ADE-1: provoc de acotacion semiautomatica dc 
los dibujos, asi como una scrie de herramientas 
utiles, sobre todo, para dibujo industrial y 
arquitectura. 

ADE-2: proporciona otra serie dc herramientas 
quo facilitan cl empalme dc dibujos c incluso 
ensayar arrastros v enipalmes para observar el 


resultado sin moditicar rcahnente ol dibujo hasta 
que sc de con cl resultado optima. Tambicn 
permite obtener simotnas dcliniondo siniploiucnte 
cl ejc. 

ADE-3: representa dibujos en ties dimensiones, 
dandolos la altura dcseada y cstabieciendo una 
coordenada como punio de vista del dibujo. 

Ade.mas de cstos programas, cl Autolisp (jue 
incorpora es un longuaje quo permite simplillcar 
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la entrada dc dates por d tcclado, asl como 
girar, ampliar, reducir o dcscomponcr dibujos. A 
traves dc cstc lenguaje, sc pueden crcar nuevos 
comandos con los que funcionar cti cl programa. 

Conclusion 


Aunque para hacer corrcr cste programa on cl 
Amstrad hay epic gastarse cAsi cl doble dc lo que 
vale cl ordenador cn pcriicricos y anatlidos, 
profcsionalcs dc nmy diversas I'amas pueclen 
cncontrar cn Autocad un programa 
c.xtrcmadamcntc practice). Las posibilidadcs del 
programa son prat ticamcntc ilimitatlas, y cstc 


aruculo solo rcllcja algunas dc las mas 
importances. Expliearlas todas ocupana 
probahlcmcntc cuatro o cinco revisias como esta. 

El manual que acompana al programa es muy 
complete y esta cscrito cn castcllano, cosa dc 
agradecer. El unico problema t|uc hay es la 
cscasa information que da sobre la conliguracion 
del programa, pero describe a la perfection su 
funcionamiento. 

Por su prccio y sus caracterfsticas, es un 
programa espedheo para profcsionalcs que 
tengan que rccurrir al dibujo frecucntcmente, 
sobre toclo para discriar. Si sc 1< saca todo cl 
rendimiento, cstc programa tenrira clificil 
sustituto cn cstc tipo dc negodos. 



En esta serie de fxintallas se puede apre- 
ciar algunos campus cn los que se puede uti- 
lizar este programa y la variedad de colo¬ 
res que titiliza. 


Distribuyc: Solironics, S, A. Cos- 
lada, 3, 1-5. 28028 Madrid, 

Tel.: 255 50 05/04 
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EL CAD-CAM 
ESPANOL, EN 
PRIMERA 

LINEA_ 



Seria ocioso msistir en la enorme importancia del diseno asistido par ordenador para 
ordenadores PC compatibles, ast comu tambien estd claro que en este mercado, responsable de 
la movilizacion de una enormt cantidad de dinero, existe un estdndar en CAD: el 
archicanocido Auto Cad. Pues bien, un grupo de programadores espanoles ha desarrollado un 
sistema de diseno asistido, centrado en el tratamiento de objetos tridimensionales, que supera 
ampliamente al famoso programa americano en este terreno concreto. Esta jova del software, 
porque dificilmente se la puede llamar de otra forma, estd escrita en Fortran, desarrollado 
sobre un Vox de Digital y transportado a un ordenador tipo PC considerablemente reforzado 
en cuanto a hardware. Una muestra mas de la gran calidad del soft profesional hecho en 

Espana. 


Jt-J as siglas CAD carrcsponden a las incialcs 
de Computer Aiding Dosing, es dceir, diseno 
asistido por ordenador. La sights cspafiolas 
podrian scr, pues DAO o DAC, segun sc asuma 
hi palabra ordenador o computador. 

Inicialmcnte la sigla D dc CAD haeia 
referenda mas al Dibtijo que al Diseno coino tal, 
pues era aquel cl realmento ayudado. ( -C6rno? 
Substituyendo cl trazado con regia y compas, por 
la impresion dc punios procedentes del calculo 
automatizado sobre la ecuacion de la recta y la 
ircunferencia. 


La maquina, en consccuencia, ya empezaba a 
dibujar, pero todavia no podia ayudar al dibujo. 
Era demasiado engorrosa la labor dc entrar todos 
los datos por el teclado, y tampoco exisuan los 
periicricos —complerncntos al ordenador— 
adecuados para la salida grafiea, entrada de datos 
dc punios, ni un soporte sistematizado que 
permitiera una practica interactividad maquina 
usuario. 

La relativamcnte rccientc aparicion de los 
mouses (ratones), labletas digitalizadoras, plotters 
(trazadores graficos), impresoras graiicas, joysticks 
(mandos dc video iuegos), unido a la 
incorporacion del monitor comu periferico 






































































La precision cjiic perniite el si sterna cs sorprendcnle. Observes*.* el dclalle } colorido 
del di.se no del robot antes de dark* volumcii. Id program a pennile obtener todo tipo 
de perspeetiva concebible en un objeto, con o sin aumeiUo. 


Kn la loin superior, cslan los padres de la crialura. (Ion sii csl'ucrzo ban erciido una 
obra maestra del software ipalico. Kn las lotos izejuierda v dereeba, se puede ver un 
niismo dibujn cn formato de linea y rcllcno de color. 
















impnrtante del urdenador, y al paralelo desarrollo 
de la tecnologfa video, han hecho desaparecer las 
barreras incomodas que impedian la colaboracion 
hnmbre-rnaquina en el dibujo. 

CAD 2D es el nombre pur el que se designa a 
aquellos programas de dibujo ayudado por 
ordcnador, que se espccializan cn sirnplilicar y 
automatizar el calculo y trazado de lineas 
presentcs sobre un piano de trabajo (panualla del 
televisor o papel), mediante la substitution 
interna de la regia por la ecuacion de la rerta. y 
el compas por la ecuacion de la eircunferencia. 

Los CAD 2D constituyen la primera gran 
revolution en el mundo de la informatica grafica, 
nu solo al liberar al dibujante de parte de su 
tarea inecanica, sino al of'recerle un mundo de 
pequenas ayudas: gama de colores para 
diferenciar lineas que se borran sin dejar rastro, 
memorization de dimensiones, calculo y 
representation de propordones, estalados, 
repcticiones, superposiciones, etc. 

El ambito de los CAD 2D es un universo de 
dos dimensiones, aun tuando la disposition 
relativa de las lineas trazadas en cl induzca al 
espectador a intuir una profundidad. 

La denomination CAD 2D 1/2 se utiliza para 
aquellos sistemas que manipulan lineas en el 
espatio, permitiendo una representation 
semiautomalica cn perspettiva isomctrica dc las 
lineas entradas. 



Todo lo que usted se puede imaginar, 
es posible hacerlo con una asombrosa 
facilidad usando el sistema Dilos 3D, 


La denomination CAD 3D sc reserva para 
aquellos sistemas gra liters que sobrtpasan su 
coneeptuacion de herramientas para hater pianos, 
siendu su unidad de trabajo la superficie, en vez 
de la lfnea. Kilo pennite abordar, ton todas sus 
consccuentias, el calculo de las propiedades 
volume!ricas y geomeiritas de los nbjelos reales, 
asi conio la construction automalica, tambien, de 
cualquier tipo clc vista bidmunsional del cuerpo. 

Los sitemas 3D han permitido al hombre 
romper una limitation historica. En efecto, 
hasta aliora cualquier representacion 
tridimensional de solidos ha estado cn el propio 
solido, en su rnaqucla, o en la mente del que lo 
concebfa. Y euamlo este debfa explicarlo solo 
tenia ties altcrnativas: Construirlo (3D), 
rnaquctarlo (3D), o realizar sus pianos (2D), dc 
acucrdo ton unas convtntionts cstablecidas. 
(I'ltnsc (1 lector tanto en una piramide egipcia, 
torno tn el diseiio de un nuevo encendedor.) 

El receptor dc plants reconstrufa, con su 
ayuda, la volumetna del solido en su mente. Y 
asi sc ha perpetuado hasta nuestros dfas la 
transmision de las formas tridimensionales. 3D en 


Dilos ID puede represenkir on pmUulla simultanearncnlc 2 a It 
color® distint os. For tanto. cl clcclo so aproxima c inoluso 
supera a la oalidad folografica, olorgando un as poo to 
prolcsional al maximo a etinl<|Ciior disefio. 



litiagon digitalizada. Mediantc* lc»s digitalizadorcs, una imagen 
cualquiora del mundo real puede ser Iransmitida a la pantalla 
del ordcnador, donde un software adecuado, como en cl caso 
dc Dilos 3D, puede obrar maravillas. 












Estas 4 fotos mucstran las formas b^sicas cn las quo un objcto pucdc scr iralado por el sisicma: dibujo liueco, relleiui dt color ton 
perspectiva y volumen. y con posibilidad dc girarlo cn cualquicr angulo (foio inferior ixquicrda), 



la monte, 2D cn los pianos y tie nucvo, 3D cn 
otra monte. 

La aportaeion fundamental dc la tccnica 3D es 
quo, por pritncra vcz on la historia, cse eiclo 
basico sc ha roto y da cabida a un receptor dt' 
formas 3D no hurnano. El proceso base Gambia: 
3D - > 3D —> 2D, cn cl caso particular dc vistas. 
Peru desde este segundo 3D sc abre un horizon to 
do nuevas aplicacioncs, eon las ventajas asociadas 
quo de su potential cxplotacion sc dcrivan y quo 
Dilos 3D por supuesto contempla. 

Entrc las ventajas cabc destacar: 

— Reduction del trabajo de la Oficina 
Tccnica, cn terminus tradicionales dc expresion 
grafira (Pianos), a la realizat ion dc un unico 
trabajo dc modclado con dimensiones rcalcs, para 
podcr obtener dc cl infinitos pianos a cualquicr 
escala, de cualquier vista, o vistas, tanto 
exterinres como internas (secciones). 

— Reduction del cielo Gonccpcion/Realizacion 
de nuevos productos, al podcr experimentar con 
la creation, sin depender de los pasos intermedios 


qtn' eonllcva la matt riali/acinn de pmtolipox, 
tit xpiercs.,. 

— Reduct ion tie liempo y eirorcs cn 
Rctliscno, Modification y Pianos Derivatlos, al 
proccdcr dc Sblidos coi rcctos ya doxarrollados. 

— Acccso a nines calculos, cn los quo la 
premisa cs C|uc los onion ado res connzcan la 
geometna del sdlitlo objclo dc ealculo (CAM, 
CAE). 

— Aplicacidn a scclorcs tan tliversos eomtj 
Ingeniena Meoanica (Pic/.as, Meeanismos, 
Mitcpiinas, Ingeniena tit planta..,), o 
Arquilootura, y Diseno Industrial, (Objctos, 
Intcnorismo, Art|nitcrtura, Urbanismo...), etc. 


Modclado de solidos y D ilos 3D 

Dcntro dc los sisternas 3D cxistcn dos grandcs 
grupos: los sisternas dc diseno de superficies y los 
de Modclado de Solidos. A su vez los sisternas de 






















l a caractcriitica mas tlcslacnblf del programs cs sli faeultad dc iiltirgnr volurnen a los objetos. jugando can la ikmiinaciun (pic la 
tigura rccibc desde un unico puntn dc luz que sc puede colocal' a gusto del disenador. 



Modelado dc Solidos pueden subclasifiearse segun 
cl modclo interno dc modelado y representation: 
geometrica consuuctiva dc solidos (CSG), arboles 
octales, caras planas, etc, 

Tal clasificacion rcsponcle a la olerta dc 
disdntos caminos para aproximar y cxplotar, 
segun sea cl tin, a la geumeina volumctrica real 
del solido objeto dc rcprcscntacion, del mismo 
tnudo que en cl sector mccanico existen distintos 
tipos de Maquina-Hcrramicnta segun sea cl tipo 
de pieza v mecanizado a conseguir. 

Dilos 3D es una estacion Autonorna de 
Modelado tridimensional dc solidos, propiedad dc 
G\S, S. A. que, bajo sus directrices, ha gido 
dcsarrollado por el Departamento dc Mctodos 
Informaticos dc la Universidad Politecnica de 
Cataluha, e implementada sobre una p'rimera 
solucion Hardware, dischada cn paralelo eon 
Hispano Olivetti y los departamentos de I + D dc 
Olivetti de Ivrea (Italia). 

DILOS 3D cs un modelador de solidos 3D 
basado en caras planas. Los objetos quedan 
delinidos a traves dc las superficies i'romcra que 
lirnitan su volurncn, c kucrnamen.ie const ituidas 


por la yuxuipo.sicibn dc lumicrosas caras planas. 
quo aproxnnan la superlieie real con la precision 
que determine cl usuario, 

Rccoge t'ocla hi iuicva mctodologfa antes 
enunciada. y la eon forma para offerer al usuario 
un potente, llcxible e intuitivo eamino para 
generar. ver, y esludiai’ solidos con alto grade de 
clicacia y lacilidad dc manejo, partiendu de la 
base que tal usuario no lienc porque scr un 
ex per to i n fo n naticq. 

bstc primer soporte esta pensado para ofrecer 
las siguientes prcstaciones: 

— Pret io/Poli ncia/Prcstaciones; Poder poner 
al alcanee dc las ccouomias dc las empresas 
cspanolas una herramiema 3D con las ventajas 
indicadas, y que hasta ahora solo quedaba al 
alcanee, por sus alios prccios. de his grandes 
compafnus. 

— Autonoinia: Poder disponcr de un equipo 
autonorno y casi portable con cl I’m de poder 
desligar los l’rio entornos de las grandes 
instalaciones informSticas que se precisaban, de 
los deseables e independientes que a menudo 
reclama la crcatividad. 
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— Crctimicnio: Podcr configurarsc sobrc oiras 
Macjuinas quo intcgren a estas primeras para 
alcanzar, paulatinamcntc, un sislcma amplio y 
distribuido quo njW'overhr todo csfucrzo initial 
al'crluadn, 

— Abierto; Para podcr configurarsc a mtdida 
tic la expcrtex y requcrimicnios dc comodidad y 


— Qompalibilidad con otro so It ware dc gestitin 
compatible: Podcr disponcr cn la estacion dc 
algiin proccsador capaz dc cxplotar tambicn otros 
Software del mcrcado, coma son los dc los 
Ordcnadorcs Personalcs. 


Las posibilidadcs son ilimitndas. Podemos fratcionar euatquicr Imaged pot- cl piano que sc dcscc. iratarlos indcpcndicntcmcntc y 
lucgu volvcrlos n unir cn una sola cnlidad. 


La clave del diseno tridimensional 
escriba en el efecto de volumen que 
crea la luz v la sombra. 







Selection del color, Vo a sc la palcta disponiblc cn la mitad 
inferior dc la pantalla. 


Nuevo ajustc del tamano dc la colunina a una escala mas 
convenient. El menu de la dcrccha (los rclojcs). sirve para 
girar la figura en un arbitrario numero de grados. 


productividad del usuario, par una parte, y paia 
poder explotar inlbmiaticamente los solidus 
previamente introdueidos en la estacion. poi oira. 


InDuts del modelado de Dilos 3D 


Uno de los principales retos que presents un 
Modelado de Solidos es eomo gobernai la 
ubicacion de superficies, de mndu que se situen 


correctamente, confortnando la creacion que cl 
usuario persigue, 

El subsistema de Modelador de solidos de Dilos 
3D adopta un soporte muy intuitivo: La tecnica 
del Barrido (Sweep), por reflcjar la mayoria de 
etapas constructivas del solido real. 

Un barrido consiste en disponer de una cara 
plana, —aunque tan compleja como el usuario 
desee, y desplazarla por cl espacio. El volumen 
barrido en el espejo es. directamente, el solido 





































Una vcz ctcgida la section, ptoccdcmos a girarla alrcdcdor dc Creacidn y definition del eje de simctria, 
un eje. 



Pcrspcctiva del objeto perpendicular al observador. 
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La columna, con volumcn debido al efccto dc la sombra y el 
rcllcno dc color. 


considerado. Eri otras palabras, si cl cspacio f’uera 
de mantequilla e introdujeramos, empujando, un 
embolo estariamos generando un ciiindro. Peru si 
en vez de empujar cn linea recta, lu hicieramos 
circularmente obtendriamos parte de un anillo 
torico. 

Esta tecnira es muy practica y flexible. V 
ademas es potente. La potencia le viene dada 
por: 

— Las herramientas —-todo un CAD 2D 


Creadon dr la base paraldepipedica del diseno. 


interno capaz dc dibujar cn cualquicr piano del 
cspacio—, disponiblcs para la construction dc la 
cara 2D que se utilizara para Barrcr. 

— Los tipos de barridos a realizar (traslacion 
normal y vectorial, rotation, conifleation 

— troncos de piramides o ennos—). 

— La posibilidad de repetir estc eitlo 
indefinidamente sobre las nuevas caras del solido 
resultante, eon cualquiera dc los barridos, tamo 
desplazandose hacia el exterior —generando 
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El productu final, huuco. 


— Kjcc union dc Secciones (qucdandose con una 
o amlias parte), o las Untouts dc dos prcviamcntc 
creados. 


salientes—, cornu hacia el interior —qcncrando 
vadados—. 

Oomplemcntando las tecnicas de barrido, 


coexisten dos grupos mas dc herramientas, 


— Conlinuar con nuevo .i Barridos iterativos sobrc 


rcclamables en cualquicr morncnto de la creacidn: cualquiera dc los solidos rcsultantcs. 

— Obtencion dc Solidos Derivadus , asi como su Asisticndo al modclado, cstan las herramientas 


igual (duplicado), su simetrico, su dc Manipulacion dc Solidos cn cl cspacio, quo 

cnmplerncntario (molde), su rccscalado, p^rmiten tomar o soltar los solidos que sc dcsecn 

—proporcional o cn proporciones distintas a cada para aplicarlcs una determinada accion o 
eje (dciormado)—. movirniento, via traslacioncs y roiaciones, asf 
















Aciibamos do croar imu imagcn tompk-lanunlc i*ci|I con i»r.m lacilkkttl \ cn mil) poco ikmpn. Sin cl nrdciuidor. csto no hubicra 
sidn posibk. 


como modilirar sus airihums dr noHilsrr. rolnr, 
clensidad, n material constilnlivn. Pnr 
camino sc cstableren posieiones tie solicit>s cn el 
eHtacio que pcrmiten eonligurar y esiudiar 
cnmplejos rseenarios. 

Outputs del modelado de Dilos 3D 

Cuando sc dispone de loda la geomeliia del 
soli do o solidus en el ordeiiadnr, Dilos lo explain 


eon distintos lines; 

— I'kiifi/htttitiii. Di/os 11) imorpora mi potentc 
subsislema de visualizacion, quo asisle 
interarUvamente al de modelado, eon loial 
gobienju sobrc : 

— Represent at ion. Alambriea (Wireframe, y 
sin lineas ocul(as). 

— Represeiitaeibn eon iluminat ibn (ton o sin 
sua\ i/.ado tk las aristas de earns no planas del 
solicit) real). 


t 
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La solution de diseno tridimensional 


— Tipo dc Vistas simultaneas, inrluycndo las 
tradicionales. 

— Pcrspcctivas Axonornciricas. 

— Perspectivas Conicas con Zoom 
Automatical, o a Camara Fija. 

— Procedencia del loco dc iluminacibn. 

— Color y sombreado dc los sblielos. 

— Ampliation y reduccion (zoom). 

— Centro de atencibn observado (. 

— Position y Distalicia del Observador. 

— Calculo. Dilox gttarda la densidud dc cada 
scilido delinido, y pucclc calendar cualqmcr 
magnitud gcometrita o ligada a volumcn y 
densidad, reclamables cn rualquicr cstaclo de l 
sistema: 

— Coordenadas de puntos. 

— Disianeias, 

— Angulos. 

— Areas. 

— Volutnenes. 


— Pesos v Centi'os de Gravedael. 

— Prockielos \ Momentns de Inereia. 

— Hiretern. 

— I 'Islets 2D sabre <4 fwpei. Cualc|uier \ista 

proeedenle del subsislema dc visualizaeidn, cn 
Uuito estc rcpi'c'scnoula por «alambrcs» o «ecm 
climinncinn cle Imcas ocuIta.s», cs susceptible do 
oblcnersc sobre pape.1, via plotter, a la escala cjuc 
sc 1 desee. FI sistema permile igutdmenie pasarlas 
a olros sistemas 2D, para ineorporar otras 
opciones partieulares del munclo del piano. 

Prr Prorcsador. Di/ox eomo programa es cerrado. 
Iic'i'o eomo sistema es abierlo. Fs cerrado para 
gamutizar su correeto luncionamiento. y es 
abierto on su entrada y salida para ecmjignrarse a 
la medida del usual io. por una parti', y por otra 
para quo estc puecla utilizar los sdlidos rroados on 
otras aplieaciones cuyo primer past) obligado c's 
elisponer de sus geometrias (CAM, CAK). 











Por: Marize Benayas Pazos 


Generador de estrellas 

El Locornolive Basic es muy versatil a nivel grafico, y 
donvicrte cn una tarca scncilla cl uso dc instructions tan 
esotericas como las funciones «seno», «cQtsena» y la orden 
«origin». Para rnostrarlo, hemos degido un pequcno 
Jirngramita que genera «estrellas» en la pantalla hadendo 
uso dc todas cstas funciones. 
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Rotacion y giros 

Este prograrna muestia de que forma 
tan simple puedc rotarsc y/o girarsc un 
«objeto» (jerga de graficos por 
computador para designar una iinagen 
total o partial), en este caso del tipo 
pnlfgono. Observcsc la orden nCLG», 
linea 13, especializada en borrar la 
pantalla de graficos solaracnte. 
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Papelera 

Como las ordenes graftcas sirven, sobre 
todo, para dibujar aquf va este programita 
que presenta en la pantalla un objeto que, 
por decir algo, llamamos papelera. Sin 
pretender demostrar nada mas. 
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iste una parte de las matematicas 
mada «geometri'a fractal- que, aparte 
producir imagenes increfbies, se usa 
ra representar las superficies mas 
nplejas que existen: montanas. Este 
jgrama Simula el efedo con gran 


t KOHTBS * 

n ,180:y-COS< n /4)^-^* <n/ 

POE T °~ n ?I|p 2 
FOR v“-n TO n STEr a 

MMK B ho 1 v.-2 : DRAV ho.-200.0 

gg v?i 0ALL MB1#-.EM> 

! siKitsssas-.. 

3 PLOT ho.v»,IsRETURR 


Parabolas 

Hablando de geometrfa, nada hay mas 
familiar que las figuras de toda la vida, 
como las parabolas, ni nada hay mas 
comodo que dejar al ordenador que los 

realice. _ 

parabolas * 

,T p .r.rfo >c »T.'=« r ».»» 

31 * 3 20 '^°k D lTHP 2 
ys-100 TO 0 STEF ^ 

x-'y- 1 , 

nrlxv,1:PLOT -x.-y.l 

, 0T y.x.-^^.i 

,0T y. T - . PLOi y. 

|?Sl5 J 0.0: WHILE -1 
1 R o»L TO 039 
DVB 0,1: DRAW O.400, 1 

EXTitfBRD 





































Sinusoidales 

Dispuestos a rizar el rizo, si uno coge 
una onda sinusoidal y la mezcla con 
otras de determinada forma, se obtiene 
una serif de curvas de lo mas 
sorprendente. 

1 ' # Mariza Banayas Pazos # 

2 MODE 2: ORIGIN 320,200:RAD 

3 au=0. 1: GOSUB 9 

4 FOR x=0 TO 1000 STEP au 

5 PLOT 200*CDS<x/ll>.200*SIN<x 
/12), 1 

6 DRAW 200*COS<<x+au)/ll),200* 
.3IN((x+au>/12) , 1 

7 IF INKEYtO’”’ THEN 2 
6 NEXT:CALL &BB18:RUN 

9 ' 

10 12=VAL<"0.0”+STK$CRND*9>> 

11 11=VAL<”0.0"+STR$<RND*9>> 

12 IF 11 = 0 OR 12=0 THEN 9 

13 RETURN 
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Disenador de graficos 

No. no, el ti'tulo de cste truco no es una 
broma pesada ni una exageracion. Con 
12 Ifneas del Amstrad Basic, usted 
puede crcarse el esqueleto basico dr 
rualquier disenador de imagenes. 


1 # DISEVADOR DE GRAFICOS # 

2 # Mariza Bennyas Pazos * 

3 MODE 2: x=320: y=200: GOSUB 11 

4 WHILE INKEY C9> -1 

5 'Debes usar las teclas del c 
ursor y para terrainar la tecla 

'COPIA' 

0 IF INKEY <010-1 THEN y=y+2: G 
OSIJB 11 

7 IF INKEYC2) 0-1 THEN y=y-2:G 
OSUB 11 

8 IF INKEY <8) 0-1 THEN x=x-l:G 
OSUB 11 

9 IF INKEY<1)0-1 THEN x=x+l:G 
OSUB 11 

10 WEND: END 

11 ' 

12 PLOT x,y. 1: RETURN 
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21 return 


Distorsion 

Dibujar un objcto puede ser scncillo, 
pcro, a primera vista al mcnos, 
distorsionarlo cs ya oira cucstion 
conipletamente distinta. Pues no es (an 
dilicil. Este minusculo listadu muestra 
cdmo hacerlo. 
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r ecnicas de dibujo 
en tres dimensiones 



por Marize Benayas Paras 

A A 

La versatilidad que estan demostrando tcner los ordenadores es 
algo que dfa a dia queda mas paterite, sorprendiendonos a todos 
con nuevas aplicaciones (^ p mpos insospechados. Una de las que 
mas atraen es, sin duda, el Diseno Asistido por Ordenador. 


tk 


quicn no lc gustaria poder hacer rnasM 
atractivo un detcrminado trabajo, ahadicrnlo 
algun que otro grafico expl^ativo, disciiar Wna 
portada rn tres dimensiones pat a el ultimo juego 
que tenemos en mente o desarro ar nuestra.s 
oeultas dotes artisticas creando objetos de mil 
formas... ? 

Para poder hacer todo esto y mucho mas 
tenemos que desechar la idea de que cl arte y la 
irnaginacion no son compatibles con la tccnica. El 
ordenador no cs mas que una herramienta como 
puedan serlo el lapiz o cl papel y de nosotros 
dependc el uso que le queramos dar. 

Dicho esto pongamonos manos a la obra. 

Vamns a empezar pensando en la pantalla como 
cn urx papel de dibujo. Si nosotros quisieramos 
dibujar un punto cn cste papel tendriamos que 
decirlc al ordenador c! sitio donde queremos que 
lo situe, o sea, las coordertadas hori/.ontales y 
verticales que ocupa en la pantalla (figura 1). Por 
ejemplo: 

PLOT 320,200 
Horiz. Vert. 

Si nuestra intention fuese la dc girar ese punto 
tendriamos: que hacer unos cuantos v pcsarlos 
calculus para situarlo cn una orbita de giro 
(figura 2). Pero para eso tenemos cl ordenador, 
^no? As! que vamos a dejar que sea el quicn nos 
haga el trabajo (Programa I). 

Ya hernos visto como gira un {junto en el 
espacio. Ahora vamos a ir mas lejos had on do 
girar dos, pero cn diferentes orbitas (Programa 
II). Es muy sencillo, lo unico que tenemos que 
hacer es anadir una altura para cada una de las 
orbitas y variar uno de los radios de la 


El dibujo en 3D, usando 
el Lomomotive Basic, puede ser 
sorprendenlemente sencillo. 


circunlcrcncia para dar scnsacion de perspectiva 
^gura 3). 

Sc pregumaran donde queremos ir a parar con 
todo rsio. Bien, pruebe a suprimir la lfnea 90 del 
programa y cambic la 00 por: 

80 DRAW radio 1 *SlN(angulo),radio2*COS 
(Angulo) + altura2,l 

Ya lo estan viendo pio? H ernos uni do los dos 
puntos que temamos rnediante DRAW y. 



PUNTOS 0I3PON1BL63. 

horizontal 

VERTICAL 

MODO • 

»60 

200 

MO 0 0 1 

320 

200 

MODO 2 

640 

200 


horizontal 


• FIGURA /. 
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Esencial para la perspectiva es la 
creacion dc ejes dc giro. 



s' quisieramos general- un voluraen? Esto 
paiecen ser palabras mayores, pero que nadie se 
asusle. Seguro que todos ban visto alguna vez 
una rueda cJc cochc, liueiio pues por obra y 
graeia de la gcometna, a la pobre rueda, que no 
dene la culpa de nada, sc lc ha pucsto el 
nombreclto de Volumen de Revolution y no es ni 
mas ni menos que un piano vertical que gira 
alrcdedor dc un eje generando una figura. 


El arte dc generar voliimenes 

Si sc fijan en la figura 4 veran que hemos 
anadido dos orbitas mas dc giro. ^Con que 
propqsito? Pues porque aliora no queremos girar 
dos jnintos corno cn el ejcmplo anterior sino 
cuatio (uno por cada verticc del piano). Despues, 
uriiendo estos pantos c.ntre si, definimos las 


La creacion dc volumcnes es la gran 
clave del diseno tridimensional. 


«trazas» o lfinites del piano. 

Elegimos la longitud del lado del piano a girar 
cn el Programa Ill (finca 20), para poder caleular 
las orbitas dc giro (pruebc con 100), Si Gambia cl 
valor del radio! (Ifnea .'50) vera epic cl rcsultado 
varfa mticho (Ej: radio! = 1). Eo mismo ocurre si 



cambiamos cl valor del resto dc las variable^. 

Ea mejor forma dc en tender c6mo funciona v 
para que sirve algo cs «jugando» con ello. Asf 
que eso es lo que vamos a barer con nuestro 
progrkrna. ^Quc pasana, por ejcmplo, si 
cainbiasemos las alturas o el valor de los radios? 
Para satisfacer nuestra curiosidad vamos a 
cambiar algunas h'neas del programa y anadir 
otras: 



30 INPUT Radio 1:’ ;radiol :radio2 = radiol/2 

50 INPU'I ’’-Altura l:’ ;abural 

51 INPUT’ -Altura 2:’ ;altura2 

Corra cl programa y ilicta los valorcs que sc lc 
ocurran. Dc. la misina lbrma, si cambiamos cl 
valor del SJ EP dc la tinea 70 conseguiremos que 
cl piano girc dc grado cn grado (STEP 1) n dc 
10 grades cn in grac los (STEP 10), coniu mas les 
gustc. 
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• F1GURA 5. 


Mas dificil todavia 


Si haciendo girar un planu de cuatro vertices 
hcmos generado una rueda, <;se imaginan lo que 
saldria si girasemos un piano con 10 6 50 
vertices? 


Podemos hacer girar un piano 
con un ilimitado numero 
de vertices. 

Las pusibilidades son infmitas. Pcro nos 
volveriamos locos calculando cada una de las 50 
orbitas dc giro, ,;vcrdad? 

Una solucion mas sencilla podri'a ser el empleo 
de tablas. Para estc proposito utilizarcmos una dc 
dos dimcnsioncs (filas y columnas). 

El numero dc lilas vendra dado por la cantidad 
dc vertices (puntos a girar) que tenga el piano y 
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el do columnas siempre sera dos: uno para 
guardar las coordenadas horizontales y otro las 
verticales de los puntos (figura 5). 

Programa IV: en el organigrama de la figura 6 
se explica su estructura. En las lincas 160 y 190 
ponemos topes maximos y mi'niraos a los valores 
que introduciremos por teclado para no pasarnos 
ni quedarnos cortos. 


Basta unir dos puntos con una recta, 
gxrarla y tenemos un volumen. 


En las lmeas 170 y 200 le restamos a esos 
valores los topes mmimo. ^Por que?, pues para 
que al generar la figura, no se saiga de la 
pantalla y la podamos ver, que de eso se trata. 

Cuando el programa le pida el numero de 
vertices prucbe a meter 6 y luego teclee los 
valores de la tabla de la figura 5. 

Hasta ahora hemos visto que, uniendo dos 
puntos con una llnea y haciendo girar la recta 
resultante alrededor de un eje, gencrabamos una 
Superficie de Revolution (figuras 3 y 4). 

Dcspucs, girando un piano vertical con un 


EJE Y 


25 # 


13 *-- 




32 * 


EJE X 


FIGURA 7. 
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10 REM PROGRAM I 
20 CIS 

30 radio=l00 
40 ORIGIN 320,200:006 
50 FOR angulo=0 TO 360 STEP 10 



60 PLOT radiotSIN(angulo),radiotCQ3(angulo),l 

70 CLG 


80 NEXT angulo.-GQTO 50 


10REM PROGRAM II 

20CLS 

30radiol=100:radio2=radiol/2 
40altural=100;altura2=250 
500RIGIN 320,0:DEG 
60FOR angulo-0 TO 360 STEP 4.3 
70 PLOT radioltSINtangulo),radio2tCQS(angulo)+altural, 1 
80PL0T radioUSIN(angulo),radio2tCQS(anguio)+altura2,1 
90 CLG 

100NEXT angulo 


10REM PROGRAM III 
20CIS:INPUT'-Lado del piano 
30 radiol=100:radio2=radiol/2 
40 radio3=radiol+lado:radio4=radio3/2 
50 altural=100:altura2=250 
60ORIGIN 320,0:DEG 
70FOR anguio=0 TO 360 STEP 4,3 
80PLOT radioltSIN(angulo),radio2IC0S(anguIo)+altural,1 
30DRAW radio3tSIN(angulo),radio4XC0S(anguIo)+aItural,l 
100DRAW radio3*SIN(angulo),radio4tCGS(angulo)+altura2,1 
1100RAW radioliSIN(angulo),radio2tC0S(angulo)+altura2 ,1 
120DRAW radloltSINfangulo),radio2*C0S(angulo)+altural,1 
130NEXT angulo 



10 REM PROGRAMA IV 
20 MODE 2:PAPER 0:PEN 1 

30PLOT 320,150,1:DRAW 420,150:PLOT 320,ISO:DRAW 320,300 
40PLOT 320,150 

50LOCATE 37,7:PR I NT”300-":LOCATE 37,16:PRINT'150-* 
60L0CATE 41,17:PRINT CHR*(145):LOCATE 40,18:PRINT'320" 

4 _ 

/ 

dctcnninado nurnero dc vertices, hemos generado 
un Volumen de Revniucion (figura 5). 


Girar cualquier cosa 

Cuando dccimos «cualquie| cosa», desde luego 
nos referitnos no solo a girar pianos, sino 
volumenes: cubos, piramides, pentagonos... jen 
fin! poliedros regulares e irregulares. 

Con el Programa V podemos girar cualquier 
figura con solo introducir el numcro de lados de 


70 LOCATE 53,17:PRINT CHRM145):LOCATE 52,18:PRINT’420* 
80 LOCATE 41,6:PAPER 1:PEN OlPRINT'Y* 

90 LOCATE 54,16:PRINT"X" 

100 WIN00WI1,1,80,1,3:PAPER!1,1:PENH, 0 
110 INP0TI1,*- Nu*ero de Vertices :vertices 
120 DIM plano(vertices,2) 

130 FOR a=l TO vertices 
140 CLSil 

150 LQCATEI1,1,1:INPUT#!,”- Coord. X (de 320 a 420): *;» 
160 IF (*<320 OR *>420) THEN 140 
170 plano(a,l)=»-320 

180 LOCATE#!,1,3:INPUT#!,”- Coord. Y (de 150 a 300): 'in 
190 IF <n<150 OR n>300) THEN 180 
200 pianola,2)=n-150 
210 IF a=l THEN PLOT »,n,l:G0T0 230 
220 DRAW «,n, 1 
230 NEXT a 

240 REM ## GIRO DEL PLANO #1 
250 CLG 

260 ORIGIN 320,150:DEG 
270 FOR angulo=0 TO 360 STEP 10 3 
280 PLOT planofvertices,1)tSIN(angulo), 
planotvert ices,l)/2*C0S(angulo)+plano(vertices,2),1 
290 FOR z=l TO vertices 
300 DRAW planotz,l)tSIN(angulo), 
plano(z,l)/2tCQS(angulo)+plano( 

310 NEXT zlNEXT angulo 
320 END 


10 REM PROGRAM V 
20 MODE 2 

30 radiol=100:radio2=radiol/2 
40 altural=150:altura2=250 
50 ORIGIN 320,0:DEG 
60 INPUT'-Lados lados 

70 grados=360/lados 
80 FOR imgiro=0 TO 360 STEP 8 
90 FOR angulo=inigiro TO 360+inigiro STEP grados 
100 PLOT radiolTSIN(angu!o),radio2tC0S(angulo)+altural,l 
110 DRAW radiol4SIN(angulo+grado5), 
radio2tC0S(angulo+grados)+altural, 1 
120 DRAW radioLtSIN(angulo+grados), 
radio2TCQS(angulo+grados)+altura2,1 
130 DRAW radioltSIN(angulo),radio24C03(angulo)+altura2,1 
140 NEXT angulo 
150 FOR p=l TO 200:NEXT:CLG 
160 NEXT inigiro 




la misrna (Ifnea 60). Si por ejcmplo tuvicra 4 
lados, la separation entre vcrtice y vertice seria 
dc 90 grados, 360/numero dc lados (linca 
70-figura 7); dc esta forma, cuantos mas lados 
tenga, menor sera la scparacion entre vertices y 
viceversa. 

d odos estos programas son una pequena 
mucstra dc las inmensas posibilidades del diseno 
asistido por ordenador. A su libre albedrfo 
dejamos el utilizer estos mismos, ampliarlos o 
modificarlos dependiendo de sus necesidadcs. 
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Como sejmn hecho 

los mejores juegos 

Tecnica 

Filmation 


Crear un juego en tres 
climensiones es una ilusion 
que cualquiera pucde poner 
en practica siguiendo cstas 
explicaciones sobre la Tecnica 
Filmation. 


Par: Alberto Suncr 




TT 

ace alguil tiempo aparccio en el mercado 
un programa para ordenador, en concrete) para 
Spectrum, aunque mas tarde sc paso a oiros 
sistemas, entre cllos a Amstrad, que revoluciono 
en cierta forma cl mundo de la programacion de 
juegos, por supuesto nos estamos refiriendo al 
programa Knight Lore. 

Estamos seguros de que cualquier aficionado al 
mundo de los juegos ha ofdo hablar en mas de 
una ocasion de dicho programa, ya que 
represento cn su clfa una gran innovacion en el 
mundo de los videojuegos. 

Lo primero que sorprendio, en su momento, 
de dicho programa, fue hi presentation 
tridimensional del esccnario dondc transcurre la 
accion, que luego ha sido trasladado a centenares 
de programa.s. 

A este rnetodo de prograniac ion se le bauti/o 
con c'l nombre de Tecnica Filmation, debido a la 
gran perfection de sus movimientos y a la 
posibilidad de que cada personaje que interviene 
en el juego pueda aparecer cn pianos diferentes, 
dentro de una misma pantalla dc juego. 

Por todos cstos morivos vamos hoy a imentar 
explicar como funciona la tecnica mcncionada 
antcriormcnt.c, que a partir de ahora podremos 
utilizar cn nucstros propios progrnmas, incluso 
desde Basic, gracias a la rutina ciue hemos 
p re parados la cual incluye dos nuevos tomandos 
RSX que nos permitiran mover graficos cn 
pantalla con cl metodo Filmation. 

La prirnera particularidad que presenta csta 
tecnica dc impresion en pantalla, es referente a la 
forma cn que se deben confeccionai los graficos. 

Cada uno de los personajes u objetos a los que 
se desee aplicar este tipo de impresion, debera 
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posccr, adenitis de su imageri, una mascara dc 
dicha imagen. 

Cuando nosotros rcaljzarnos un grafted para 
utilizarlo postcrionnentc on nuestro programa, 
reali/amos un dibujo del personaje qnc descamns 
que aparezea fen pantalla. Ahora biun, la 
utilization dc la tecnica Fihnatian requiem una 
iinagcn cn inverso o en negative dc dichn dibujo. 
hsto ultimo cs lo que se denomina mascara. 

\ cantos, pucs, cua.lcs senan los pasos a seguir 
cuando nos pongamos a near nuestro propin 
gralico. En primer lugar. crearfamos la imageri 
del objeto que deseamos se imprima en pantalla y 
la almaccnanamos una vez acabada. 

A contiiiuacicm, tomando esa misma iinagcn o 
dibujo corno referenda, deberemos rdlenar todos 
los punios vaefos que rodean dicha imagen, 
dejando un pixel en bianco entre d dibujo 
original y su rcileno. 

Una vez realizada esta opcracion, deberemos 
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borrar cl dibujo original, con lo cual nos quedara 
su imagen inversa, a lo cual se denomina 
mascara. 

Por ultimo, la almaccnarcmos a continuation 
del dibujo origianl. 

Debcmos advertir que la mascara se rcaliza 
siempre con tinta 3, independiontemente del color 
que posea la imagen original. 

Tcncmos en este momento preparado nucstro 
grafico para scr imprirrudo en pantalla con la rutina 
que utiliza la tccnica Filmalion (ver dibujo 1). 

Veamos ahora los pasos que deben scr 
realizados por la rutina de impresion, para 
conseguir que el grafico que sc dcsplaza por la 
pantalla, lo haga de una forma suave y sin 
parpadcos. 

Las rutinas de impresion nOrmales dan 
movimiento a los gralicos, imprimiendolos cn 
una position de pantalla. Seguidamente se borra 
este ultimo colocando cn su lugar lo que habia 


anteriormentc en pantalla y se imprime es una 
posicion contigua, con lo cual sc da la scnsacion 
de movimiento. 

Lsto se consiguc realizando las opcraciones dc 
impresion y borrado en el momento en que se 
produce el barrido de pantalla, por lo cual 
nuestros ojos no son capaces de observar dichas 
operaciones. 

Ahora bien, esto se puede realizar con bloques 
graficos relativamente pequenos, ya que, cn el 
momento cn que nucstro grafico sea lo 
suficientementc grande, las opcraciones de 
impresion y borrado superaran cl tiempo en que 
tarda en producirsc cl barrido de pantalla, con lo 
cual apareccra esc molesto parpadco. 

Por tanto, lo que sc pretende, cs intentar 
rebajar cl tiempo dc las opcraciones dc impresion 
y borrado. Sc puede conseguir irnprimiendo y 
borrando al mismo tiempo, con lo que nos 
quedamos con un tiempo de ejecucion igual a la 


1 REN FILMAT[ON 

2 OflTOS OEL GRAFICO 80LA 

to rem mtmmmmmmmmmu 

20 REM tttt DAT0S PARA C0NFECCI0NAR tut 
30 REN mt LA PELOIA Y SU MASCARA ttU 

40 ren mtmmmtrnmmnttmtu 

50 REN 
60 REN 

70 FOR N=47530 TO 47650 
80 READ A:SUHA=SUNA+A 
90 POLE N,A 
100 NEXT 

110 IF SUMA046A73 THEN PRINT “ERROR EN DATAS' 

120 BATA 255,255,255,255,255,255,255 

130 DATA 255,136,51,255,255,255,238 

140 DATA 0 0,255,255,255,136,0 

150 DATA 0,51,255,255,0,0,0 

160 DATA 17,255,233,0,0,0,0 

170 DATA 255,238,0,0 0,0,255 

180 DATA 204,0,0,0,0,119,204 

190 DATA 0,0,0,0,119,136,0 

200 DATA 0,0,0,51,136,0,0 

210 DATA 0.0,51,136,0,0,0 

220 DATA 0,51,136,0,0,0,0 

230 DATA 51,136,0,0,0,0,51 

240 DATA 204,0,0,0,0,119,204 

250 DATA 0,0,0,0,119,238,0 


260 DATA 
270 DATA 
280 DATA 
230 DATA 
300 DATA 
310 DATA 
320 DATA 
330 DATA 
340 DATA 
350 DATA 
360 DATA 
370 DATA 
380 DATA 
390 DATA 
400 DATA 
410 DATA 
420 DATA 
430 DATA 
440 DATA 
450 DATA 
460 DATA 
470 DATA 
480 DATA 
490 DATA 
500 DATA 
510 DATA 
520 DATA 
530 DATA 


0,0 0,255,238,0,0 
0,0,255,255,0,0,0 
17,255,255,136,0,0,51 
255,255,238,0,0,255,255 

255.255.136.51.255.255.255 

255.255.255.255.255.255.255 
25-5,255,2S5,255,0,0,0 

0 , 0 , 0 , 0 , 0 , 0,0 

0,0,0,0,55,200,0 

0,0,1,59,184,0,0 

0.7,119,220.192,0,0 

15,119,220,224 0,0,14 

255,233,224,0,1,14,255 

238,240,0,1,14,255,238 

240,0,3,29.255,255,112 

128.3.29.255.255.112.128 
3,23 255,255,112,128,3 
29 255,255,112,128,3,29 

255.255.112.128 1,14,255 
238,240,0,1,14,255,238 
240,0,0,14,255,238,224 
0,0,15,119,220,224,0 
0,7,119,220,192,0,0 
1.59,184,0,0,0,0 
55,200,0,0,0,0,0 

0 , 0 , 0 , 0 , 0 , 0,0 
0 , 0 , 0 , 0 , 0 , 0,0 
0 , 0 , 0 , 0 , 0 , 0,0 























PROGRAMA CARGADOR 

240 

BATA 

62,1,50,51,130,122,188 

550 

DATA 

203,33,203,39,71,197,5? 



250 

DATA 

32,4,62.2,24,7,56 

560 

DATA 

49,130,71,26,182,119,13 



260 

DATA 

4,62,1,24.1,175 50 

570 

DATA 

35,16,249,35,35.193,16 



270 

DATA 

56,130,34 61,130,84,33 

580 

DATA 

239,201,221,229,205,33,131 



280 

DATA 

195,183,128,33,65,130,237 

590 

DATA 

235,36 44,120.203,39,203 



290 

DATA 

75,59,130,62,2,50,51 

600 

DATA 

33,203,39,50,47,130,12! 

1 REN FIU1ATIDN 

300 

DATA 

130,50,56,130,237,91,57 

610 

DATA 

50,48,130,213,235,33,176 

2 REM PROGRAMS CARGAOOR 

310 

DATA 

130,205,201,123,205.18 129 

620 

DATA 

191,66,22,0.29,25,17 

10 FOR N 

=48000 TO 4822F 

320 

DATA 

201,33,66,130,237,75,59 

630 

DATA 

80,0,25,16,25?,221,225 

20 REAO 

a:sijha=suna+a 

330 

DATA 

130,223,213,197,205,201,129 

640 

DATA 

56,47,130,71,24,21,1:4 

30 POKE 1 

M 

340 

DATA 

205,212,128,205,18,129,205 

650 

DATA 

230,56,254,56,40 6,124 

40 NEXT 


350 

DA T A 

69,129,193,209,225,205,110 

660 

DATA 

198,?,103,24,8,17,60 

50 IF SUNAOS7408 THEN PRINT “ERROR EN 0ATAS" 

360 

DATA 

129,201,33,65,130,237,91 

670 

DATA 

0.124,238,56,103,25,197 

60 DATA 

1,9,128,33,26,128,19$ 

370 

DATA 

63,130,58,56,130,254.2 

680 

DATA 

229,58,48.130,7:. 1.97,22! 

70 COTA : 

209,188,17,128,195,30,128 

380 

DATA 

40,5,254,0,40,2,25 

690 

DATA 

126,0,:18,35,221,35,193 

80 DATA 

195,100,128,79,206 83,80 

390 

DATA 

25,235,58,51,130,254,2 

700 

DATA 

i6»245,225,193,16,214,221 

90 DATA ! 

32,73,84,197,0,0,0 

400 

DATA 

40,5,254,1,40,2,13 

710 

DATA 

225,201 221,229,235,36,44 

100 DATA 

0,0,221.94,0,221,86 

410 

DATA 

19,33,113,132,58,50 130 

720 

DATA 

120,203,39,203,39,203,39 

110 DATA 

2,221,110,4,221,102,5 

420 

DATA 

203,39,203,39,203,39,7! 

730 

DATA 

50,47,130,121,50,43 130 

120 DATA 

34,52,130,237,83,57,130 

430 

DATA 

137,6,0,58,43,130,79 

740 

DATA 

213,235 32,176,191,66,22 

130 0A T A 

237,33,61,130,221,110,6 

440 

DATA 

237,176,19 $,133,16,242 

750 

BATA 

0,29,25,17,80,0,25 

140 DATA 

221,102,7,34 54,130,22! 

450 

DATA 

201,237,91,54,130,33,65 

760 

DATA 

16,253,221,225,53 47,130 

ISO DATA 

76,8,221,70,10,120,50 

460 

DATA 

130,237,75,63,130,9,35 

770 

OA’A 

71,24,21,124,230,66,254 

160 DATA 

50,130,121,50,49,130,4 

470 

DATA 

221,33,113,132,58,50 130 

780 

DATA 

56,40,6,124 186,8,103 

170 DATA 

4 12,12,237,67,59,130 

480 

DATA 

203,33 203,39,203,39,7' 

730 

DATA 

24,3,17,80,0,124,238 

180 DATA 

65,33,0,0,17.8,0 

430 

DATA 

197,58,49,130,71,126,22! 

300 

DATA 

56,103,25 197,229,58,48 

190 DATA 

25,16,253,34,63,130 195 

500 

DATA 

113 0,26,166.119-19,35 

810 

DATA 

130,71,197,126 221,113,0 

200 DATA 

157,123,221,110,0,221,102 

510 

DATA 

221,35,16,243,35,35,133 

820 

DATA 

35,221,35,193,16,245,225 

210 DATA 

2,34,57,130,237,91.61 

520 

DATA 

16,233,201,237,31,52,130 

330 

DATA 

193.16,214,221.225,201,20! 

220 DATA 

130,123,189,32,4,62,2 

530 

DATA 

33,65,130,237,75,63,130 

840 

DATA 

25,189 197.1,100,0,11 

230 SATA 

24 7,56,3,175,24,2 

540 

DATA 

9,35,58 50,130,203,35 

850 

DATA 

120,177,32,251,193,201,0 






IWMMM 


99/OFF 


99/OFF 



mi tad del utilizado con el metodo anterior. 

Vamos a ver, pucs, que pasos deberemos 
seguir para conseguir dc una sola vez la 
impresion y el borrado del grafico, reponiendo al 
t mismo tiempo lo que habfa anteriormente en 
pantalla. 

Para ello, deberemos preparar un espacio de 
irabajo en memoria en el cual coloearemos el 
trozo dc pantalla donde sc debe imprimir la 
mascara y cl grafico propiamente dicho, y otro 
espacio en el cual alrnacenaremos el trozo dc 
pantalla que debe ser repuesto una vez el gralico 
haya cambiado de posicion. 

Una vez preparados estos buffers dc trabajo. 


leeremos la porcion de pantalla donde se va a 
imprimir el grafico y la traspasarernos a dicho 
buffer. Despues coloearemos all! mismo la 
mascara del gralico, mediante operacioncs AND, 
con lo cual unicainentc nos quedara la parte del 
trozo dc pantalla donde el gralico imprimira, al 
mismo tiempo alrnacenaremos el contenido del 
buffer donde sc va a colocar el gralico, en otro 
espacio dc memoria, para luego rcponcrlo. 

Seguidamente coloearemos en ese mismo buffer 
cl gralico original, mediante operacioncs OR, con 
It) que conseguiremos una copia de lo que debe 
aparecer en pantalla. 

Ahora unicainente nos queda imprimirlo en 
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pantalla con la rutina correspondiente, quc sera 
una rutina de irnpresion normal, la cual 
traspasara dicho buffer de trabajo a la pantalla. 

La longitud del buffer de pantalla, debera ser 
la misma quc la del grafico quc se desce 
imprimir, mientras que la dimension del buffer 
dc trabajo debera ser la misma que la del grafico, 
aumentando en dos la altura y la anchura (ver 
dibujo 2). 

Veamos a eontinuacion cuales son los nuevos 
comandos RSX que nos permitiran la utilizacion 
desdc Basic dc la tccnica Filmation. 

Como se ha comentado anteriormence, csta 
tccnica se basa en la operation dc irnpresion y 
borrado simultaneo del grafico a imprimir; por 
tanto, los desplazamicntos que se produzcan no 
pueden scr cri ningun momento bruscos, es deeir 
saltos dc mas de un caracter en cualquier sentido. 
ya que la rutina quedaria sin efecto al no reporter 
el trozo de pantalla en el que se encontraba el 
gralico ameriormente. 

En primer lugar tenemos el eomando que nos 
permitira inicializar la irnpresion de un grafico, 

ION,A,B,DM,DG,X,Y 

donde tada uno de los parametros corresponde: 


A . Alto del grafico 

B . Ancho del gralico 

DM . Dircccion de la mascara 

DC . Dircccion del grtifico 

X . Coordenada vertical 

Y . Coordenada horizontal 
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1 1 1 1 1 1 

PROGRAMA DEMO 

1 1 

100 003.28 270 

■ 1 1 1 1 1 1 

240 IF 1=0 THE 1 S=M:Y=Y-i:GflT0 70 


110 SOTO 7 0 

250 30508 270 


120 Y*Y-1:X-X+l 

250 SOTO 220 

: fiEr FILMATION 

130 IF Y=1 THEN Y=Y+l:S 

-Y-l:GQTC 70 270 |SPRITE Y,K 

2 m PF06RAMA DEMO 

140 IF X=72 THEN Y=Y-* 1: 

<=M:G2T0 170 2S0 C 0R r=! TQ SOlNEXT 

10 MODE 11 BORDER 0: INK 0.0'INK 1 24!INK 2,23:INK 3 6 

■ 15C 60SUB 270 

296 RETURN 

20 MEMORY 9999;LOA0*pibubitl” 38000 

160 3010 120 

300 D =0 

20 CALI 380OO 

170 I=H:i'=Y'i 

310 FOR n=7 15 

40 603UB 3O0 

ISO IF Y=4 THEN K=M:', 

=Y+l:S0 T 0 220 320 FSfi y=2 TO 3? 

50 10N ; 3 6,20000,20144 5 1 

190 IF 1=0 THEN X=X+l:V 

“MlfiOTO 120 330 P=P+i: IF f=d *HEN P=: 

BO Y=5:K=i 

2O0 60SUE 270 

346 PEN p 

70 Y=Pl:M+l 

210 GOTO 170 

350 LOCATE y,mPAINT fHS» 202! 

SO IF Y=22 THEN K=X- 1:Y=Y-1 : Q0TQ 120 

226 M-UW+l 

360 NEXT y :NEXT r, 

90 IF 1=72 THEN Y»Y-1; K=M :60TQ 220 

1 1 1 1 ■ ■ 

230 IF Y=22 T HEN MH1 

■ 1 

P-V-liSOTG 170 370 RETURN 

■ ■■■IIS 




El segundo nuevo comando, quc nos permitira 
imprimir nucstro gralico cn pantalla cs: 

ISPRITE,X,Y 

dondc «X» e «Y» indicaran las coordenadas 
vertical y horizontal, respectivamcntc. 

Para dar una idea del funcionamicnto de 
nuestra rutina, hemos preparado un programa 
dernostracion, cn cl cual sc podra observar (anto 
cl funcionamicnto dc los nuevos comandos, ast 
corno cl movimiento que sc obtiene con la 
utilizacion dc la tccnica Filmation. 

Este programa de dernostracion utiliza un 
grafico con su mascara, quc deberan encontrarse 































PROGRAMA ENSAMBLADOR 


1 jFILHATlON 


570 CP 

L 

2 .jLISTAOO ENSAHBLADOR 

S80 JR 

NZ.NOHIS 

10 

ORG 

*8000 

590 LD 

A,2;PARADO 

20 



600 JR 

PONFLl 

30 



610 N0HIS1 JR 

C,VADER 

40 ItltRUTINA 0E IHPRESI0N SISTEHA FILHATIONUt 

620 X0R 

A 

SO 



630 JR 

PONFLl 

60 



640 vaoer: lq 

A, 1 

70 



6S0 PONFLl: LO 

(IZDER).A 

80 

LD 

BC,TABLA 

660 LD 

A, D 

90 

10 

HL,ESPACE 

670 CP 

H 

100 

JP 

I3CD1 

630 JR 

NZ.NOHISl 

110 EABLA: 

0EFV NAHE 

690 LD 

A,2 

120 

jp 

INISPR 

700 JR 

P0NFL2 

130 

jp 

NOVSPR 

710 N0HIS1: !R 

C,VABAJ 

U0 NAHE: 

0EF1 

”0’ 

720 LD 

A,I 

150 

DEFB 

■N’t*80 

730 JR 

P0NFL2 

160 

DEEM 

’SPjll* 

740 VABAJ: X0R 

A 

170 

DEFB 


750 P0NFL21 LD 

(ARPABA) A 

130 

DEFB 0 

760 LD 

(PQSANI),HL 

190 ESPACE: 

0EF3 

4 

770 LD 

0,H 

200 



780 LD 

E,L 

210 



790 JP 

HOVllAN 

220 INISFR: 

LD 

E, (11*0) 

800 


230 

L0 

D, ( IX+2) 

310 *L+ 


240 

LD 

L,(in4i 

320 tiUPINBUFm 

250 

LD 

H,(n+5! 

830 XL- 


260 

LD 

(CIR6RAi,HL 

340 iINIC:ALI2ACI0N 

270 

lD 

(PDSHANi,DE 

850 ; 


230 

LD 

tPDSANT) 9E 

560 iCE-C00RDENADAS DE IMPRESI0N 

290 

LD 

L,(!I+6) 

870 1 


300 

LD 

H,(IK+7) 

880 INIHAN: LD 

HL, BUFFER 

310 

LD 

(QIRHASUL 

830 LO ‘ 

BC,(OIMENS) 

320 

LD 

C,CIX+8) 

900 LD 

A,2 

330 

LD 

B UM0) 

910 LD 

(IZOER),A 

340 

LD 

A, B 

920 LD 

(ARRABA),A 

350 

LD 

iALTO),A 

930 LO 

DE,CPOSNAN) 

360 

LD 

A,C 

940 CALL PANMEM 

370 

LD 

(ANCHD),A 

350 CALL PINMAS 

380 

INC 

e 

960 RET 


330 

INC 

B 

970 i 


400 

INC 

£ 

980 ;MOV[MIENT0S 


410 

INC 

c 

390 : 


420 

LD 

(DIHENS),BC 

1000 ;DE-COORDENADAS DE INPRESI0N 

430 

LO 

B,C 

1010 jIZ0ER=0 IZ0UIER0A 

440 

L0 

HL, 0 

1020 :IZDER=1 DERECHA 

450 

LD 

DE, 8 

1030 ; IZDER=2 PARADE) 

460 SUMBU1 

ADD 

HL, DE 

1040 ;OIRGRA-DIRECCION GRAF ICD 

470 

DJNZ 

SUMBU 

1050 IDIRHAS-DIRECCION MASCARA 

480 

L0 

(LONS) HL 

1060 ; 


430 

JP 

INDIAN 

1070 HOVHAN! LD 

HL,BUFFER 

500 



1080 LO 

BC,(DIHENS) 

510 



1090 PUSH HL 

520 nOVSPR: 

L0 

L,(IX+0) 

1100 PUSH DE 

530 

LD 

H,(II+2) 

1110 PUSH BC 

540 

L0 

(FOSHAN),HL 

1120 CALL F'ANHtn 

550 

LD 

0E,< P0SANT) 

1130 CALL TROZPAN 

560 

L0 

A E 

1140 CALL 

PINMAS 


1150 

CALL PINTB 

1160 

POP 

BC 

1170 

POP 

DE 

1130 

POP 

HL 

1190 

CALL PINBUF 

1200 

RET 


1210 jBC_CQRDEMA0A3 EN LA PANIALLA 

1220 1 INPRESION 

1230 i 



1240 ! 



1250 ;COLOCA 

TROZO PANTALlA EN 

1260 j EL BUFFER 


1270 1 



1280 TROZPA: 

LD 

HL,BUFFER 

1290 

LD 

0£,(L0N6!|S*ANCH0 

1300 

LD 

A, (ARRABA) 

1310 

CP 

2 

1320 

JR 

2,TRCZE2 

1330 

CP 

0 

1340 

JR 

Z.TR0ZE3 

1350 

ADD 

HL.OE 

1360 TR0ZE2: 

ADD 

HL, DE 

1370 TRDZE3: 

EX 

DE. HL 

1380 

LD 

A,( I2DER) 

1390 

CP 

2 

1400 

JR 

Z,TR02E1 

1410 

CP 

i 

1420 

JR 

Z, TROZEM 

1430 

INC 

OE 

1440 TR0ZE11 

INC 

DE 

1450 TROZEM: 

LD 

HL, BIJFPAN 

1460 

LO 

A,(ALTO 1 

1470 

SLA 

A 

1480 

SLA 

A 

1490 

SLA 

A 

1500 

LD 

8 , A 

1510 TRBUl: 

PUSH 8C 

1520 

LD 

B, 0 

1530 

LD 

A,(ANCHO) 

1540 

LD 

C,A 

1550 

LOIR 


1560 

INC 

OE 

1570 

INC 

DE 

1580 

POP 

BC 

1590 

OJNZ TRBUl 

1600 

RET 


1610 ; 



1620 !PINTA HASCARA EN EL BUFFER 

1630 jV LEE TRQZPAN 

1640 ; 



1650 PINMAS: 

LD 

DE,(OIRHAS) 

1660 

LD 

HL,BUFFER 

1670 

LD 

BC,(LONG) 

1680 

ADD 

HL, EtC 

1680 

INC 

HL 

1700 

LO 

IX, BUFPflN 

1710 

LO 

A (ALTO) 

1720 

SLA 

A 

1730 

SLA 

A 

1740 

SLA 

A 

1750 

LO 

B,A 


1760 MASBU: PUSH BC 



en la direction dc memoria 2 

Para cargar cste grdfico, dcberemos copiar cl 
programa Basic generador del mismo y de su 
mascara y cjecutarlo, salvandolo a corninuacion 
cn disco o cirua, teniendo en cucnta que cuando 
sc dcscc utiliiar el programa de demostracion 
deberemos cargarlo en la dircccion dc memoria 
indicada antes. 












1770 


LD 

A,(ANCH01 

2390 


LD 

HL,»C000-80 

3010 

DEC 

E 

1780 

1790 

MASBi: 

LB 

LD 

B,A 

A (HL) 

2400 

2410 


LD 

LD 

B,0 

0,0 

3020 

3030 

A0D 

LD 

HI DE 

DE ,80 

1800 


LD 

(rtrOl.A 

2420 


DEC 

E 

3040 L BUC: 

ADD 

HL, DE 

1810 


LD 

A, C0ET 

2430 


ADC 

HL, DE 

3050 

OJNZ 

L BUC 

1920 


AND 

(HL) 

2440 


LD 

DE, 80 

3060 

POP 

IX 

1820 


LD 

(HL), A 

2450 

A.BUC: 

ADO 

HL, DE 

3070 

LD 

A, (ALTD 

1349 


INC 

DE 

2460 


CJN2 

A.BUC 

3080 

LD 

B, A 

1850 


INC 

HL 

2470 


POP 

IX 

3030 

JR 

CDLQL 

I860 


INC 

a 

2480 


LD 

A.iALTl) 

3100 n BUC: 

LD 

A, H 

1370 


DJNZ 

NASei 

2490 


LD 

B,A 

3110 

AND 

St 

1830 


INC 

HL 

2500 


JR 

C0L0E 

3120 

CP 

56 

1890 


INC 

HL 

2510 

E.BUC: 

LD 

A, H 

3130 

JR 

Z,H_ P A5 

1390 


F0F 

BC 

2520 


AND 

56 

3140 

LD 

A,H* 

1310 


OINZ 

HASBU 

2530 


CP 

56 

3150 

ADO 

A,8 

1320 


RET 


2540 


JR 

Z,E PAS 

3160 

LD 

B, A 

19:30 

i 



2550 


L0 

A, H 

3170 

JR 

COLDL 

:S40 

iPINTfi 

"IfiURA EN EL BUFFER 

2560 


ADO 

A,8 

3180 fl PAS: 

LD 

DE,OOBO 

1350 

i 



2570 


lD 

H,A 

3190 

LD 

(i j ^ 

1360 

pintb: 

L0 

QE,!0IRGRA) 

2580 


JR 

C0L0E 

3200 

XGR 

56 

1970 


LD 

HL,BUFFER 

2590 

E.PAS: 

L0 

DE,0080 

3210 

L0 

H, A 

I960 


LD 

BC,(LONG) 

2600 


L0 

A, H 

3220 

ADD 

HL,OE 

1990 


ADO 

HL, BC 

2610 


K0R 

56 

3230 C0LDL: 

PUSH 

BC 

2000 


INC 

HL 

2620 


LD 

H,A 

3240 

PUSH 

HL 

2010 


LD 

A,(ALTO! 

2630 


ADO 

HL, DE 

3250 

LD 

A,■ANCHi 

2020 


SLA 

A 

2640 

C0L0E: 

PUSH 

BC 

3260 

LD 

B, A 

2030 


SLA 

A 

2650 


PUSH 

HL 

3270 f! BUC : 

PUSH 

BC 

2040 


SLA 

A 

2660 


LD 

A.(ANCHl) 

3280 

LD 

A, CHO 

2050 


L0 

8,A 

2670 


LD 

B, A 

3230 

LD 

;lx*0),A 

2060 

FI68U: 

PUSH 

BC 

2680 

E.BUCl: 

PUSH 

BC 

3300 

INC 

HL 

2070 


LD 

A.(ANCHD) 

2690 


LD 

A.nx+oi 

3310 

INC 

i'i 

2080 


LD 

B,A 

2700 


LD 

(HL) A 

3320 

PGP 

BC 

2030 

FIG8!: 

LD 

A, (DE) 

2710 


INC 

HL 

3330 

OJNZ 

" sue; 

2100 


OR 

(HL) 

2720 


INC 

IX 

3340 

PDF 

HL 

2110 


LD 

(HL) A 

2730 


POP 

ec 

3350 

FOP 

BC 

2120 


INC 

DE 

2740 


OJNZ 

E BUC1 

3360 

OJNZ 

H BUC 

2130 


INC 

HL 

2750 


POP 

HL 

3370 

POP 

IX 

2140 


OJNZ 

FIGB1 

2760 


POP 

BC 

3380 

PET 


2150 


INC 

HL 

2770 


OJNZ 

E.BUC 

3390 FLYSAF: 

CALL 

•6019 

2160 


INC 

HL 

2780 


POP 

IX 

3400 

PUSH 

EC 

2170 


POP 

BC 

2730 


RET 


3410 

LD 

BC,100 

2180 


DJNZ 

FISBU 

2600 

;HL=DIRECCIDN DEL SRAFIC0 

3420 PAUS: 

DEC 

BC 

2190 


RET 


2810 

iOE=COQROENADA$ YA2S6+)( 

3430 

LD 

A,B 

2200 

;HL=0’RECCIQN del grafico 

2820 

lBC=0IHENSI0NES 

3440 

OR 

C 

2210 

iDE=C00RDENADAS Y«56V 

2830 

I 



3450 

JR 

NZ, f AUS 

2220 

|BC=0MENS!ONES 

2840 

I 



3460 

R0° 

BC 

2230 

i 



2850 

panhem: 

PUSH 

IX 

3470 

RET 


2240 

? 



2860 


EX 

DE, HL 

3480 



2250 

PINBUF: 

PUSH 

IX 

2870 


INC 

H 

3430 AJl: 

DEFS 

1 

2260 


CAll 

FLY6AK 

2880 


INC 

L 

3500 ANCFl: 

DEFS 

j 

2270 


EX 

DE, HL 

2890 


LD 

A,B 

3510 ANCHO: 

DE^S 

i 

2230 


INC 

H 

2900 


SLA 

A 

3520 ALTO: 

DEFS 

j 

2290 


INC 

L 

2910 


SLA 

A 

3530 IZDER: 

DEFS 

1 

2300 


L0 

A,6 

2920 


SLA 

A 

3540 0IRGRA: 

DEFS 


2310 


SLA 

A 

2530 


LD 

(ALT1),A 

3550 QIRHAS: 

DEFS 


2320 


SLA 

A 

2340 


LD 

A C 

3560 ARRAEA: 

DEFS 

1 

2330 


SLA 

A 

2950 


LD 

(ANCHD.A 

3570 POSflAN: 

DEFS 

J 

2340 


LD 

(ALT 1 ) ,A 

2360 


PUSH 

DE 

3580 DIHENS: 

DEFS 

2 

2350 


LD 

A,C 

2970 


EX 

DE HL 

3530 P0SANT: 

DEFS 

2 

2360 


L0 

(ANCHD.A 

2380 


L0 

HLJC000-80 

3600 LONG: 

DEFS 

2 

2370 


PUSH 

DE 

2390 


LD 

B0 

3610 BUFFER: 

DEFS 

SM 

2380 


EX 

DE HL 

3000 


L0 

0,0 

3620 BUFF'AN: 

DEFS 

240 

1 

iSta fi 

gnr 

i la pondremos en 

disco o 

cinta de 

la Una vcz 

ejecutado sin er 

rorcs, ] 




slguiente forma: 

SAVE' ‘ SOLA ” ,.B ,20600,288 

Para poder cjecutar la rutina, deberemos cn. 
primer lugar (eclear el programa cargador Basic, 
) ejecutarlo. En caso de cjue aparezca algun 
error, sc deberan rcvisar las lmeas DATA. 


salvarlo en disco o cinta de la siguiente forma: 
S A VE“ FI LM A' ’, B, &8D00, &22 F 

Cuando se desee utilizar, deberemos cargarlo 
en memoria a partir dc la dircccion &8O00, 
haciendo una llamada a dicha dircccion para 
inicializar los nuevos coinandos RSX. 


AMSTRAD ESPECIAL 61 









c 

rear imagencs cn tina pantalla siempre 
cs U.n desafio a la imagination, a la creatividad 
y a la pcripecia programando. Por todo 
c 11 o, AMSTRAD Semanal organiza 
entre todos sus lectures un concurso dc diseno 
grtifico sujeto a las bases quo sc dctallan mas 


Bases del concurso 


1. Entran a concurso todos los Amstrad 
CPC, PCW y d PC. 

2. Sc establecen ties categories distinias 
dmtro dd concurso, cada ana dc ellas 
correspondiciUc a cada uno dc los ordenadores 
citados cn d punto 1. Memos degido este metodo 
para que ninguno de los coticursantcs se 
encuentre cn desventaja debido a que las 
capacidades grafieas do su mfiquina scan menores 
que las dc otro modelo Amstrad. 

3. El concurso so reftere solamontc a disenos 
graflcos efcctuados on pantalla, aunque no 
iinporta cl metodo osoogido para gonorarlos. Es 
posiblc emploar cualquiora de los progratnas do 
diseno gratico comorciales que cxisteu. asf como 
crear la imagon emploando un programa on Basic 
o Codigo Maqu.ina. 

I. Las imagenes se enviaran a nuestra 
redaocion cn dnta o disco, y pueden scr un 
programa Basic quo las genere, un bloque do 
bytes o d metodo que se considerc mas 
adcouado, teniendo cn cuerita quo cl jurado que 
olija Jos ganadores solo considerara lo quo se vea 
on pantalla a nivel graftco: ni sonido, ni 
anitnacidn. 

5. E! -jurado. constituido por profesionales dd 
dilciio, ilustracion v programacion, observara 


cada ima de Pis pantallas durante cl tiempo 
neoesario y mediante los rnetodos que estime mas 
oportuuos, sdceeionando los ganadores. Su 
decision sera inapdable. 

6. El plaza de reccpcion dc: las pantallas 
finalizara el dia 1 de septicnibre dc 1987. 

7. Ninguno dc los disenos enviados se 
devolvcra al remitente. AMSTRAD Semanal se 
reserva los dcrechos de publicacibn dc los mismos 
on cl momento y condidonos que estime 
oportuuos, ciiando a su autor. 

8. Los ganadores sc haran publitos on la 
segunda quincena dd mes do soptiombre de 
1987. a traves de la revista AMSTRAD Semanal, 

9. En total, sc entregaran nueve prernios, dos 
por catogona. Eos prinieros soran los siguientes: 

Amstrad CPC: UN DIGITALIZADOR DE 
VIDEO 

Amstrad PCW: TABLE!'A GRAFICA 
GRAFPAD 

Amstrad PC: TABUETA GRAFICA 
GRADE AD-5 

y los segundos, dos para cada oatogorfa, scran 
unas cxcelentes cadenas niusicalcs alia liddidad y 
estdreo. 

10. El simple hedio dc partieipar on d 
ooncurso prcstipono la aceptacion incondioional 
do sus bases. 

Nuestra direct:ion cs: 

AMSTRAD Semanal. 

Carrctora de. [run, km. 12,400. 


28049 Madrid. 

REEFRENCIA: CONCURSO GRAFICO 
AMSTRAD SEMANAL. 
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M, J n un numero especial 
dedicado a los grdficos por 
ordenador no podia faltar 
ana recopilaadn de to do lo 
que hem os publicado acerca 
del tenia a lo largo de 80 
numeros. Estamos seguros de 
que es esencial para cualquier 
lector que desee mantener 
aclnalizada una libreria de 
rutinas para usarla en sus 
propios programas. Por 
razones de espacio , no memos 
podido incline los programas 
en cl texto, pern si los hernos 
reumdo en un disco que estd 
a disposicidn de todos los 
mteresados. 

Easy Draw f 

Es un programs de utilidad 
para la gestion de gralicos, 
eserito parte en Basic y parte cn 
Icnguaje maquina. que 
podremos emplcar para erear 
bonitas pantallas con las que 
adornar nuestros programas dc 
juegos o utilidades. 

El dibujo crcado sc puede 
grabar, jcomo no!, en cinta o 
cn disco para poder ir dandole, 
poco a poco, los pequenos 
retoques que lc conviertan en la 
obra macstra que deje 


satislcchos i propios y extranos. 

Las instrucciones son 
scncillas, pero, debido a que 
hay 19 opciones y cada una 
requiere un «pdui» dc practical, 
reoomendarnos irlas lcvcndo 
dcspacio, para asimilarlas 
corrcctamciUc. Ain van: 

Activa/desactiva 
modo dibujo CTRL 4 B 
Litiea hasta la 
posicion del 

tabulador SHIFT + TAR 

Borrar pantalla SIIIFT + CLR 
Cireulo/poligono CT R I + CLR 
Dibujar con/sin 
tabulador CTRL+D 

Rcllcnar 

superficie CT R.L + F 

Menu principal CTRL + G 

Cargar liguras cn 

memoria CTRL + I 

Desplazamicnlo 

del cursor CT R L + J 

Cargar pantalla 

en memoria CTRL+L 

Guardar figuras 

(ii memoria CTRL + M 

Cambio de color CTRL + P 

Cfrculo rapido CTRL* + Q, 

Rccuperacion 

lexto/grafiros CTR 1. + T 
Numero 1, pdgina 18. 


Char gen 



Es un generador de caraeteres 
eserito en Basic, epic nos 
permitira disenar a nucstra 
medida cualquier juego de 
caraeteres. 


Sc induyon en el gran 
cantidad de opciones tales cornu 
roiaeidn e inversion dc los 
caraeteres, dccto de espejo 
horizontal y vertical, etc. 

Su manejo no presenta 
exccsivas dificultades, ya que las 
opciones sc gestionan a base de 
un menu principal dam y 
precise, be ejcEj.ua eon RUN 
“4-CHARGE”. 

A hitnero 4, pdgina 14. 

Algun coniando RSX ^ 

Eos eomandos RSX son, en 
poeas palabras, unos eomandos 
adicionales cjuc sc escriben 
como subrutinas cn Cocligo 
Maquina. Pueclen estar situados 
cn cualquier lugar dc la 
memoria RAM y para 
invocarlos han dc ir precedidos 
por el signet «l», 

En esta ocasion cstan situados 
a partir cle la direction &8000 
v, por (anto, habra que 
activarlos, una vcz cjecutado cl 
pmgrama cargador, mediantc la 
orden CALL &8000. 

1 .os eomandos gralicos epic sc 
nos pressman son: 

IGPEN, 

opcidn color Asigna la pluma 
para gralicos y la 
opcicm dc 
ploteado. 

IGPAEER, 

color Asigna d color del 


64 AMSTRAD ESPECIAL 































papel para 
graft cos. 

lFILL,x,y Llena de color una 
color iigura. 

Seguro quc les vcnclra rnuy 
bien a los posecdores dc 
CPC-464, 

Cargador: 10-RSX l.BAS 
Demo: 10-RSX 2.BAS 
Numero 10, pagina 10. 


Sprites en el Amstrad 

wmmmmmmmmmmammmmmmmmmmm 



Desgrac iadamcnte cl Basic del 
Amstrad no los incorpora, 
aunque, no sc preocupc, 
intentaremos simularlos. 

El prograrna 11SPR1 l.BAS 
nos muestra como actua la 
opcion XOR en union de la 
opcion gralira. 11-SPRI2. BAS es 
una demostracion dc la 
complcta interaccion dc una 
rutina principal y otra quc sc 
ejecuta por interrupciones. 

Numero 11, pagina 14. 



Meinoria dc Pantalla 


Los programas Basic 
13-MAO 1 a 13-MAQjS nos dai 
una idea bastante cxacta dc 
como esta organizada la 
meinoria dc panialla de nuestre 
nrdenador. Asf poclremos 
realizar griificos jgjcrefblemente 
rapidos, y de gran suavidad de 


movimiento por medio dc 
sprites. 

Numero 13, pagina 28. 


Rotaciom de Caracteres R 

mmmmmmme: - ,—m —— XsS* 

Dos nuevos cumandos RSX: 


IPRINT.UP 
IPRIN f. DOWN 


El primero rota todos los 
caracteres dc una cadena 
alfanumerica y los imprime 
vcrticalmcntc hacia arriba. El 


binario C[ue sera la encargada 
dc llevar a nuestro «duendecillo» 
de paseo por toda la pantalla. 
Para quc funcione 
corrcctarncntc tcclcc: 

MODE 0: CALL &80Q0 

y utilice los cursorcs para cl 
movirniento. 

El tcrccro cs un editor dc 
sprites quc conticne sus propias 
instruccioncs dc manejo y su 
utilization cs bastante senJSHa. 
Ntlrnero 15, pagina 26. 



segundo hacc lo mismo, pero de 
arriba. a abajo, rotandolos cn 
sentido contrario. 

Se activan mediante CALL 
&A000, despues dc cjccutar cl 
cargador (RUN “14-RSX”), y 
se utilizan como comandos dc la 
siguiente tnanera: 

CPC-461 CPC-664 v 6128 

frase$ = '‘AMSTRAD" frasei = ‘'AMSTRAD" 

IPRINT.UP,@frasc$ IPRINT.UP, frasef 

(PRINT.DOWN," 
AMSTRAD" 

Numero 14, pagina 20. 


Disenando sus Sprites 

Tres nuevos programas nos 
ayudaran a perfeccionar nuestra 
tecnica sobre manejo dc sprites: 
15-MAQjl a 15-MAQ-3. El 
primero es un ejemplo de sprite 
dispuesto a scr utilizado por el 
prograrna en Codigo Maquina. 

El segundo es una rutina en 



Ghoques de Sprites 

'Mediante los programas 
16-MAQl y 16 MAO;2 
aprenderemos a disenar un 
nuevo sprite y, ademas, a 
movcrlo por la pantalla asf 
como detectar si colisiona con 
otro que esta fijp cn la pantalla. 

Primeo se cjccutara d quc 
define el grafico y, despuds de 
cjccutar el cargador, pondremos 



cn funcionamicnto la rutina 
mediante CALL &8000. 
Numero 16, pagina 32. 



Cambio de Colores 

,.;Cual cs cl color idonco para 
difcrcnciar claramente la tinta y 
cl papel? Ya estamos hartos del 
az.ul marine y cl aniarillo 
brillante. 

Este pequeno prograrna nos 
ayudara a clegir los colores mas 
de acuerdo con nuestro gusto, 
con cl toque de una tccla. Para 
ello: 
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RUN “20-ANALI” 


Niimero 20, pagina 21. 


Magnificacion 
de Caracteres 



pantalla de texto y poder 
utilizarla en nuestros propios 
programas. Bascomp traducira al 
Basic dicha pantalla. Increfble 
pero cierto. 

Compruebelo con RUN 
“29-ANALI” 

Niimero 29, pagina 24. 


Como su nornbre indica, nos 
permite disenar una pantalla de 
caracteres aumcntados de 
tamano para usarla despucs 
como presentacion de cualquier 
tipo de programa. Es 
perf'ectamente compatible con 
Easydraw y admite cualcjuier 
juego de caracteres creados con 
Char gen. 

Ejecutclo con: 

RUN “22-MAGNI” 

y, jadelante con su vena 
artistica! 

Numcro 22, pagina 20. 


Rotulos Giratorios 

Es un programita (35-Ideas) 
que permite visualizar mensajes 
que van moviendose de 
izquierda a derecha como si se 
tratase de un rotulo giratorio. 

Podemos utilizarlo para crear 
tltulos o bien para enviar 
cualquier mensaje dentro de un 
programa, produciendo un gran 
efecto visual. 

Niimero 35, pagina 33. 



Generador de Ventanas 


ft 


Les presentamos un 
programita que genera ventanas 
y, ademas, graba y lee del disco 
los datos que las definen, 
Muestra un metodo de trabajo 
de gran utilidad que, 
sorprendentemente, no se usa 
demasiado, pues parece que 
tuviera mala prensa o fuera 
desconocido. Pongalo en 
marcha con: 


RUN “24-ANALI” 


Niimero 24, pagina 16. 


.12 

No es un generador de 
programas, sino algo que 
explica como crear pantallas de 
presentacion de datos para 
nuestros propios programas. 
Ademas, con el aprenderemos 
bastante sobre matrices y 
ficheros. 

RUN “28-ANALI” 

Numero 28, pagina 16. 

Bascomp 

Ua idea es la misma del 
programa anterior: editar una 



Genpant 


Memoria de Pantalla 



Esta subrutina pretenae 
ayudar a conocer de una 
manera rapida y sencilla el 
mapa de memoria de pantalla 
de un Locate en modo cero. 
Ejecutelo con: 



RUN “38-IDEAS” 

Numero 38, pagina 45. 

Reduction 

Tiene por objeto reducir cl 
tamano de una pantalla a su 




cuarta parte, pudiendo salvar el 
nuevo grafico en cinta o en 
disco. 

Como esta ubicada en la 
direction &A000, la forma de 
relizar la llamada a la rutina es 
la siguiente: 

CALL &AOOO.N 

siendo N el modo de pantalla 

elegido. 

Podemos salvar el grafico de 
dos maneras: 

- SAVE “nombre”,B,&COOO,(16384/4) 
o bien: 

- SAVE “nombre”,B.&5O0O,(16384/4) 

jAh!, pero antes ejecute el 
programa cargador (40 -Compa) 
y cargue la pantalla, 

Numero 40, pagina 14. 


Dispant 



Se trata de un disenador 
grafico de pantallas, con un 
amplio numero de posibilidades, 
gracias a las que haremos 
excelcntes pantallas para utilizar 
en nuestros programas. 

El manejo del mismo esta 
abundantemente explicado 
durante su ejecucion (RUN 
“41-DISPA”), por lo que no 
incidimos en ello. 

Numero 41, pagina 16. 


Upgrade 



jConvierta su CPC 464 en 
un 6128 sin ningun problema! 
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Upgrade es un programa creador 
de una serie dc comandos RSX 
que intentan anular las 
difcrencias existentes cntre los 
dos grand es y su hermano 
pcqueno. 

Como en todos los dc cste 
tipo, primero sc cjecuta cl 
programa cargador (42-Upgra) y 
despucs se activa la utilidad 
mediante GALL, 6A000. 

Los nuevos comandos graficos 
son: 

lI RAME Sincroniza la 

escritura con el 
rctorno del haz 
del monitor. 

IGRAPHICS. 

PAPER,tinta Asignamos una 
tinta especlfica al 
papcl, utdizando 
el modo grafico. 

IGRAPHICS. 

PEN,tinta Lo mismo para 

la pluma de 
graficos. 

lMASK,cntc- 
ro,primer 

punto Define una 

plantilla para 
trazar rcctas. 

Suponemos que los siguientes 
comandos son lo suficientemente 
conocidos como para deeir tan 
solo que «x» c «y» son las 
coordcmidas dondc queremos 
colocar cl cursor dc graficos, 
tinta selccciona la tinta para la 
pluma de graficos y modo 
determina la manera logica dc 
rclacionar la pluma con cl 
londo. 

lMOVE,x,y, tinta, modo 
I PLOT, x,y, tinta, modo 
lDRAW,x,y, tinta, modo 
lMOVER,x,y ,tinta,modo 
lPLOTR,x,y, tinta, modo 
lDRAWR,x,y, tinta, modo 

Por ultimo, IFILL, tinta nos 
rellena dc color cualquicr figura 
cerrada. 

Numero 42, pagina 24. 


Impresion 

Pequena rutina cn Codigo 
Maquina para imprimir un 
rnensaje en la pantalla con 
diferentes plumas. Para cllo, 



ejecutar cl programa cargador 
(45-Maq) y despues: 

CALL &A000 

Numero 45, pagina 12. 


Magnificador j 

En esta ocasion prcsentainos 
una rutina muy util para el 
tratamiento de graficos, ya que 
permite obtener de una figura 
relativamente pequena otra 
cuatro vcces mayor. 

Para que funcione 
correctamente hemos dc 
ejecutar el cargador (46-Magni) 
y despues Uamar a la rutina 
con: 

CALL &A000 

Las teclas empleadas serfan: 
COPIA Producir la 

magnificacion 



P Dcvolver la pantalla 

original. 

S Salvar la pantalla. 

ESC Volver al Basic. 

Con las teclas del cursor 
movcinos cl mismo, para 
dccidir que zona dc la pantalla 
es la que queremos ampliar. 
Numero 46, pagina 16. 


Impresiona 
con tu pantalla 

Con cl programa 46-Maq se 
estudia la manera dc realizar un 



marco o presen tacion de una 
pantalla. Como siempre, 
ejccutamos el programa 
cargador y despues CALL 
&A000. Los efectos scran 
sorprendentes. 

Numero 46, pagina 26. 


Ventanas 


En esta ocasion comprobaremos 
como sc pueden definir 
ventanas desde Codigo 
Maquina y corno se selccciona 
c! color para cada una dc ellas. 
El modo de poncr cn marcha 
esta rutina es semejante al 
programa anterior (47-Maq). 
Numero 47, pagina 18. 

Graficos definidos 
nor el usuario 


Nucstra atencion sc rentrara 
ahora en definir nuestros. 
propios caracteres graficos desde 
Codigo Maquina. La rutina 
48-Maq nos da una muestra 
viva dc lo que queremos. ^La 
forma dc comprobarlo?, como 
cn los dos programas antcriores. 

Numero 48, pagina 24. 




Scroll pixel a pixel 

Hemos crcado varios 
comandos RSX con el programa 
49-Scroll para acceder a cada 
uno de los posibles scrolles dc 
dondc suaves: 

IROLLDXY, Scroll a la 
A,R derecha. 

!ROLLI,X,Y, Scroll a la 
A,B izquierda. 

lROLLU,X,Y, Scroll hacia 
A,B arriba. 

lROLl,A,X,Y, Scroll hacia 
A,B abajo. 

donde «X» e «Y» son las 
coordenadas de la esquina 
superior izquierda del bloque de 
pantalla a desplazar, y «A» y 
«B» la altura y anchura de 
dicho bloque. 

Ademas proporcionamos una 
pequena Demo para aclarar 
conceptos (49-Sdemo). 

Numero 49, pagina 16. 
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Genchar 



Inversion de 
Pantallas 

Le toca el turno ahora a la 
inversion de pantalla, tanto 
vertical como horizontalmcntc. 
Para utilizarla lo prirnero es 
ejecutar el programa cargador 
(51-Inver) y dc ah.i sacar la 
rutina ubicada en la direction 
&A000, 

Dcspues, sc carga la pantalla 
que queremns invertir y a 
continuation se hace una 
llamada a la rutina. 

Con CALL &A000 se 
produce una inversion vertical 
de la pantalla mientras que con 




CALL &A000,1 la inversion cs 
horizontal <:De acucrdo? 
Numero 51, pdgina 22. 


Ait a Resolution 

Este programa se realiza cn 
la pantalla con diferontes tintas 
proporcionando un marco 
adecuado al texto a imprimir. 

Como en casi todas las 
rutinas en Codigo Maquina que 
homos visto, lo cargamos 
ejecutando el programa 
cargador (51-Maq) y la 
llamamos con CALL &A000. 
^Verdad que se produce un 
resultado curio,so? 

Numero 51, pdgina 18. 



A partir de ahora y con el 
programa que os presentarnos, 
no sera precise cfectuar la 
penosa tarea de lr componiendo 
de uno cn uno todos los 
caractcrcs que nos interesen. 
Nuestra rutina es capaz de 
generar cientos y cientos de 
nuevos juegos de caractcrcs que 
podremos incluir en nuestros 
programas. 

Sc basa cn la crcacion dc 
nuevos comandos RSX, por lo 
que ejccutaremos prirnero el 
programa cargador (52-Gench) y 
luego, salvamos la rutina: 

SAVE ”CHARS ,, ,B,&9500,500 

Para cargar el Codigo 
Maquina confeccionaremos un 
programa Basic semejante a: 

10 MEMORY &94EF 
20 LOAD “CHARS”,&9500 
30 CALL &9500 

y ya sc habran inicializado los 
comandos RSX. Son los 
siguientes: 

I CARSO a 

ICARS9 Diferentes 

efectos sobre los 
caracteres. 

IG1RIO Rotation de 90 

grades. 

Numero 52, pdgina 10. 


Graficos Relativos 



Este programa incluye los 
comandos graficos que no se 
vieron en el 51-Maq efectuando, 
ademas, una pantalla de 
presentation con ellos. Se carga 
y ejecuta de la misma forma. 

Numero 52, pdgina 22. 


Diferentes tamanos 
de letras 


Nuevos comandos RSX. Nos 
permitirari imprimir cualquicr 
serie de caracteres a ties 
tamanos diferentes. 

IT1 ,x,y,“CADENA” 
lT2,x,y,“CADENA” 




lT3,x,y,“CADENA” 

donde «x» e «y» son las 
coordenadas de impresion y 
«cadena» el texto a visualizar. 

Esta vez la rutina que activa 
la utilidad se encuentra en la 
direccion &9000 y ocupa 501 
bytes. Para que funcione 
prirnero se ejccuta el programa 
cargador y despues, CALL 
&9000. 

Numero 58, pdgina 24. 


La Pantalla 


Este programa se eneargara 
de imprimir 8 bytes con cada 
uno de los colores disponibles, 
en cada uno de los rriodos de 
pantalla en los que los bits 
llevan information de color, es 
decir, modos 1 y 0. 

Los valores para modo 1 los 
toma de la primera lfnea de 
data, mientras que para modo 
0, los valores se toman de la 
segunda. 

Ejecutelo con RUN 
“67-MAQ”. 

Numero 67, pdgina 40. 



Modificar Graficos 

Esta rutina en Codigo 
Maquina se eneargara dc 
producir una rotation hacia la 
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derecha dc todos los caractcres 
o graficos que sc encuentren en 
la pantalla jen esc momcnto. Sc 
pucdc modi Hear para que, en 
lugar dc toda la pantalla, el 
scroll a ftcfe solo a una zona do 
la misma. 

Para vcrla funcionar 
ejecutamos el cargador, 
cargarnos una pantalla y CALL 
&AOOO. Vale? 

Numero 68, pdgina 11. 


quo grabara en disco o en cinta 
el codigo binario (en csta 
orasidn comienza cn la 
direction 26000). 

Sc nos aclivan dos nuevos 
c omandos USX: 

I POP, @AS Imprime la 

parte superior 
dc los caractcres 
quo format! la 
cadcna A$. 


Ejecutando el programa 
cargador (70 Maq) tendras cn la 
memoria y a tu disposition el 
binario de la rutina que podras 
dcscnsamblar e introducir en 
tus propios programas. 

Numero 70, pdgina 8. 


Cambiar Tintas 



IBUT,@A$ 


Obtiene la 
(Carte inferior 


El siguiente programa revisa 
los valorcs dc cada uno de los 


CAD-31) 



Mediante cstc programa 
podremos rcalizar cspectaculares 
graficos cn tres dimensiones dc 
una forma scncilla. Partimos de 
la seccion dc la figura y 
tcrniinamos gencrando un 
volutnen dc revolution. 

f ;Las instruccioncs? El 
proceso cs totaimentc 
autoexplicativo, asi cpte: 

RUN “68-CADCA” 
y a correr. 

Numero 68, pdgina 14. 


Gran Caractcr 



Sera la herramienta que nos 
posibilite incluir caract'eres 
gigantes en nuestros propios 
programas. Para utilizarla, 
ejecuta el orograma 69-Granc 




dc los mismos 
caractcres. 

Incluimos un programa Demo 
que pucdc sernos de gran 
utilidad (69-Demo). 

Numero 69, pdgina 10. 

Rutina dc Imprcsion 
de G raficos 

Esta rutina en Clodigo 
Maquina imprimira un gralico, 
disftnado per nosotros mismos, 
cn cuc'ilc|uicr posicidn de la 
pantalla. 

Las condicioncs de entrada 
scran: 

Delinicion Gralico Registry IX 
Dimensiones Registro' BC 
Coordenadas Registro DE 

v, ademas, definiremos dos 
etiquetas utilizarlas dentro dc la 
rutina. Scran: 

Ancho Anchura del grafico 

Alto Altura del gralico 



bytes que componcn la pantalla 
y, si dicho valor correspondc a 
una (tluma determinada, lo 
cambia per cl de la nueva 
pluma. 

Darcmos a la rutina los 
siguientes paraitietros iniciales: 

Coordenadas Registro HL 

Ancho Variable ancho 

Alto Variable Alto 

y actuaremos como cn cl 
programa anterior (el cargador 
cs 72-Maq). 

Numero 72, pdgina 26. 

| 

Generador 
dc Sprites 

Presen tamos cn esta ocasion 
un programa generador dc 
graficos, capaz de crear figuras 
semejantes a las de los juegos 
comcreiales. 

Consta dc dos partes: una en 
Basie y otra, en Codigo 
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Grna 

Maquina. Para poncrlo.s en 
rnarcha bastard con teclear: 
RUN “73-GRAF” 
y lo demas, corre a cuc'nla dc 
nuestra inspiration. 

Nilme.ro 73, pdgina 6. 


Textos Giratorios 

Es uno dc los trucos mas 
irnpresionantes que hemos visto. 
Incluye una pcquena rutina en 
Codigo Maquina que cs la que 
produce el rnovimicnto. 

Cambiando oportunamente 
las datas podreinos incluir 
nucstros propios textos. 

Y como esta tambicn cn 
Basic, lu pondremos cn 
funcionamiento mediante: 

RUN “73-BSCRO” 

Numero 73, pdgina 26. 



Papel Pintado 



Pequeno prograrna que 
genera un fondo con distintos 
colores mediante instrucciones 
poke. Sencillo pero efectivo. 

RUN “73-PAPEL” 

Numero 73, pdgina 27. 



Textos Multicolores 

Para la realization dc este 
prograrna sc ha rccurrido a la 
formula de la circunfercncia cn 
coorclcnadas parametricas. 
Variando los distintos modos dc 
pantalla obtendremos muy 
diversas prescntacioncs, lo 
rnismo que variando cl Step. En 
resumen, un truco vistoso. 

RUN “74-1 RUC1” 

Numero 74, pdgina 32. 



sprites por la pantalla. Son los 
siguiemes: 


lON.N.DIR.A.B 

N 

DIR 

A 

B 

ISPRITE,N,Y,X 

X 


Inicializa el sprite 
siendo: 

Numero de sprite. 
Direction del sprite 
cn memoria. 

Altura del mismo. 
Anchura. 

Para el rnovimicnto 
propiamente dicho, 
donde: 

Es d numero dc 
sprite. 


Movimiento 



X e V Son las 

coorclcnadas. 






Movimiento caracter 
a caracter _ 



Hern os preparado una scric 
dc comandos RSX para mover 


lOFF, N 


Desactiva el sprite 

N. 


Sc trata dc una rutina dc 
desplazarniento dc pantalla 
caracter a caracter. Los 
parametros necesarios para que 
nuestra rutina iuncione 
correctameme son: 

Ancho: DEFB 50 Numero dc bytes. 
Ltnea: DEFB 2 Numero de bytes 
sobre los que se 
cfcctua cl scroll. 

Posic: DEFW#0505 Coordcnadas, dc 
pantalla. 

,:G6rno utilizarla? Como las 
anteriores rutinas en Codigo 
Maquina. jAh!, su cargador cs 
el prograrna 73-Maq. 

Numero 73, pdgina 48. 
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Pasos a realizar: 

— Ejecutar el cargador; 

RUN “75-GRAF1”. 

— Salvar el codigo binario: 
SAVE ’’SPRITE”,B.&9000.&245. 

— Cuando se dcsce activar 
los comandos: LOAD ’’SPRITE” 
,&9000 y CALL &9000. 

Incluimos una Demo 
(75-Graf2') para ver mas 
claramente su funcionamicnto. 
Numero 75, pdgina 10. 


■ 


biblioteca forrnada con las de 
los capitulos anteriores. 
Numero 79, pdgina 4. 


Conversor 

Nos resolvera el problema 
que se nos presenta cuando 
intentamos que un grafico 
realizado en modo 2, se 
imprima en la pantalla cn uno 
diferente al que ha sido 
realizado. Su mision es evitar 
que se desfigure. 



Las condiciones miciales 


scran: 



HL 

Direction 
modo 1. 

grafico en 

DE 

Direction 
modo 2. 

grafico en 

BG 

Longitud 

grafico. 

initial del 


Cargalo en mcmoria con 
RUN “80-GRAF”. 

Numero 80 , pdgina 46. 

Y esto es todo lo mas 
interesantc. Esperainos haberos 
sido utiles, como sicmpre. 


Manejo y utilizacion 
dc Grafxcos 

fista es la rutina que nos 
faltaba para completar el 
movimiento en alta resolution: 
dcsplazarniento en sentido 
horizontal. 

Los programas cargadores 
79-Grafl a 79-Graj3 nos ofrecen 
csta rutina para cada uno de los 
ties modos de pantalla. 
lncluyelas dcntro dc la 




4 

4 

/ 

4 

4 


//////////^ 


CorreL, mas rapido,,, 





Con el fin de acelcrar lo mas posiblc el corrco, y poder resolver o contcstar a 
todas las dudas y sugerencias que llegan a nucstra redaccion, a partir dc csta scmana 
os rogamos, cn beneficio de todos, consignar en el sobrc, en lugar biert visible, una 
de las denominaciones siguientes: 


— Suscripciones AMSTRAD. Para todos aquelos casos relacionados con petition 
de cintas, nurneros atrasados, formalization de suscripciones, devaluetiones, etc... 

— Mercado Comun AMSTRAD. Compras, ventas, intcrcambios, clubs... 

— Scric Oro AMSTRAD. Para los programas quo nos envicis para su 
publication. 

— Sugerencias AMSTRAD. Para vuestras erfticas, sugerencias o cualquier 
opinion que querais vertir sobrc la revista. 


4 

4 

4 

4 

4 

4 


jr** * 


jr 


jr 



A 
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V„.«atla vcz con mas frccucncia, nuestros 
lectores nos demandan discos contcniendo todos 
los program as y utilidades publicados a lo largo 
dd mes por AMSTRAD Semanal. 

Nosotros, como dc cosmmbrc, intenramos 
haccrnos cco rapidamente de las peticiones dc 
nuestros lectores, tamo mas cunnto todo aquel 
que no posee un CPC 464 tiene que rccurrir a 
extranas artimanas para podcr cargar nucstras 
t'inta.s, y es algo tedioso, Todo aqucllo dc 
conectar cl cassette a un 6128, cables por aqui y 
por alia, etc. 

Dc estc motto crccmos hacer i'rente a la 
qrecienre demanda de nuestros programas, y 
cstamos seguros dc que la of'erta de los discos 
eomplementara y potcnciara la ya cxistcnte dc 
his tunas. a si como de epic todos los lectores 
que poscan una unidatl dc disco lo rccibiran con 
los brazos abiertos. 

Porquc lo mas sorprendente dc csta iniciativa 
dc AMSTRAD Semanal cs el precio: 999 pesetas 
por un disco nuevo replete dc programas, 
juegos y utilidades, listo para scr reutilizado 
cuando su propictario lo considcrc convcnicntc. 

Adernas, como ol'erta especial, nucsiro primer 
disco incluye cl disenador dc graficos publicado 
ert cstc minim) a partir dc la pagina 74. 

Todos los lectores pueden solicitar cn disco 
cualquiera de las cintas que ya ban side 
editadas. Por favor, para permitirnos la mayor 
rapidez dc respuesta posiblc, indicar dc forma 


clara y explicits a que numeros dc la revista 
(dentro del misino mes) corrcspondcn los 
programas que sc descan recibir. 

Nuestra direction cs: 

Amstrad Semanal. 

Carretera de Iran, km 12,400. 

28049 Madrid. 

Departamento dc SUSCRIPCI0NES. 
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Disenador 

de^ 

graficos 

para CPC 


6128 


Por: Marizc Benayas 


(haph es un programa grafico multiusos pensado para todos 
aqueUds que posean un A ms trad 6128/664, con el que se pueden 
hacer composiciones geometrieas, discnar objetos, escribir carteles con letra 
gigante, duphcar el tamano de las imageries, sacar su simetrico en la pantalla, 

grabar dibujos, leerlos, borrarlos... 


F 

J— s\ manejo do Graph es muy sencillo, solo se 
emplean las teclas del cursor y la tecla dc 
espacio. Consta de cuatro menus y en cada uno 
dc ellos hay siete opciones dc dibujo o comandos 
para las funciones del disco. 

Para poder seleccionar cualquier opcion hay 
que desplazar, con las teclas del cursos 
(arriba/abajo), la flccha que aparece en la parte 
izquierda del menu en que nos encontremos y 
presionar Copy o Copia cuando nos hayamos 
decidido por una. 

A1 final de todos los menus sc presentan tres 
opciones: 

— Borra: borra la pantalla. 

— Anter: pasa al menu anterior. 

— Menu n: pasa al menu siguiente. 

Se seleccionan de la misma forma que 
cualquier opcion del dibujo. 


Menu-1, las opciones son: 
Cfrculo. 

Ovalo horizontal. 
Ovalo vertical. 

Curva. 

Rombo. 

Cuadrado. 

Rectangulo horizontal. 


Despucs dc haber elegido una dc estas sicte 
opciones (teclas del cursor y Copia) aparecera en 
el centro de la pantalla un punto parpadoantc. Se 
debe desplazar y poncr en el lugar que mas 
convenga con las teclas del cursor, y luego 


presionar (Espacio). El resto lo hace el programa. 


Menu-2: 


Rectangulo vertical. 

Lfnea 

lina. 

Lfnea 

gruesa. 

Lfnea 

a trazos. 

Lfnea 

a punios. 

Doble 

lfnea. 

Lfnea 

a zig-zag. 


La primera opcion (rectangulo vertical) se 
selecciona igual quo las del menu anterior. Para 
dibujar lfneas libremente, se siguen los mismos 
pasos, solo que despues de presionar (Espacio) hay 
que «dibujar» las lfneas desplazandolas con las 
teclas del cursor y, una vcz c.onseguido cl dibujo 
descado, volver a presionar (Espacio) para 
iinalizar. 


Menu-3: 

Lfnea de ejes. 
Llnea inclinada. 
Punto. 

Color 1. 

Color 2. 

Color 3. 

Varfa colorcs. 


La primera opcion funciona igual que en el 
menu anterior. Si queremos dibujar una lfnea 
inclinada, marcarernos cl Origcn de la misma en 
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la pantalla corno antes (tcclas del cursor y 
espacio). Despues volvcra a aparecer en la 
pantalla el punto parpadeantc, entonces 
deberemos marcar el Final de la lmea siguiendo 
los mismos pasos de antes (cursor y espacio) y la 
lmea se dibujara. 

Para seleccionar cualquicra de los colorcs 
disponiblcs, se desplaza la fledui hasta el color 
elegido y presionar Copia, estos colorcs no afectan 
al borde de los dibujos, o sea, cl contorno del 
dibujo siempre se dibujara cn negro, pero si 
afectan al relleno interior o exterior de las figuras 

(Fill). 

Si sc clige la opcion de Varia-Colores, hay quo 
presionar cualquier tccla rnenos la de (Espacio) 
hasta que sc cncuentren los colores que se deseen 
y entonces presionar (Espacio) para finalizar. 
Mcnu-4, opciones especiales: 

— Fill: rellcna areas de la pantalla con un 
color. Los pasos a seguir son los mismo, situar 
con las tcclas del cursor y presionar (Espacio). 

— Zoom +: con esla opcion se puedc aumentar 
de tamano cualquier zona de la pantalla, 
haciendo que ocupe la totalidad de la misma. 
Despues de haber situado el punto (cursor) en la 
posicion a aumentar, se presiona (Espacio) (como 
siempre) y sc espera un ratito sin tocar el teclado 
para nada hasta que el Zoom fmalice. F,sta opcion 
del programa cs un poco lenta, pero son cosas 
del lenguaje y seguro que cuando veas los 
resultados tc daras cuenta de que ha valido la 
pena esperar. 

— Copia: sirve para duplicar una parte del 
dibujo. Hay que seguir los mismos pasos que 
para Zoom + , pero esta opcion no es tan lenta 
como la otra. Se situa el punto con las tcclas del 



Al final de cada menu aparecen tres opciones , como se ve en la 
foto, que se seleccionan con el cursor. 



cursor en el lugar que se quicra duplicar, y 
presionar (Espacio). 


Save. 
Load. 
Era. 


Antes dc seleccionar cualquicra de estas tres 
opciones, hay que asegurarse de que el disco esta 
metido en su unidad. No debes sacarlo para 
nada, tambien debes tener cn cuenta que No cste 
protegido contra escritura y que tenga la 
suticicnte capacidad como para guardar dos 
pan tall as por cada una que salves. Cada pantalla 
ocupa 17 K del disco, pero el programa no solo 
graba con la opcion Save, asi que es 
recomendable cjue utilices un disco virgen para 
estc programa. 

Si sc selecciona cualquicra dc estas tres 
opciones, la pantalla se borrara y aparccera un 
catalogo de los dibujos que existen en el disco, 
solo hay que introducir el Ntimer.0 del dibujo y 
presionar Return o Enter, pero cuidando de no dar 
un niimero de dibujo que no existe al eargar o 
borrar una pantalla ya que habria que 
reinicializar el programa con RDN y sc perderfa 
toda la informacion de la ultima pantalla. 

— Mayor/menor: esta opt ion sirve para variar el 
radio o la longitud del lado dc las figuras 
gcometricas de los menus 1 y 2. Preguntara 
Mayor sf o no. Si contesta «N», la proxima ligura 
sera mas pcquefia que la anterior, y si se 
responde «S», sera mayor. Pero los resultados no 
scran visibles hasta que se vuclva a dibujar 
alguna figura. 

Como se puedc ver, cste programa tiene 
muchas pusibilidadcs y seguro que cualquiera es 
capaz de encontrarle alguna mas, asf que ahora 
solo hay que ccharle imaginacion a la cosa y 
disfrutar. 
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"A I'M 

‘ i \' r 


- ML 


1 'I# Z - G R A F H *f 

2 1* Per: NARIZE BEKAYAS PAZ03 If 

3 MODE IBORDER 16 : PAPER 1 :CtM*ien= 
1 :hy =380 

4 Eoni=! 00 :ii 55 o= 16 :cclor= 0 :rh<j=i 00 : 
rve=rho/ 2 :res= 50 :inc r=hy+res:sw -0 

5 bo=l 6 ;pa= 2 :x= 320 :y= 200 : ti 0 = 0 :tit= 
26 :ti 2 = 0 : ii 3 ='S:c 0 = 0 :cl=l:c 2 = 2 :c 3=3 
:INK 0 , 0 :INK 1 , 26 :INK 2 , 0 :INK 3 , 16 : 
BORDER ho:PA^'ER pa 

6 ' 

7 GOSUB 387 :GOSUB 244 :SCSUB 276 :GOS 
UB 282 


8 ON BREAK GOSUS 284 :ON ERROR GOTO 
285 

9 ' « I N I C A L I Z A » 

10 GOSUB 387 :ON m: GOSUB 115 , 117,1 

f r, m, 
iJ,iii 

11 GOSUB 17 

12 WHILE - 1 :CLEAR INPUT:FOR p=i ’0 
140 :NEXT 


13 IF IKKEYC2)0-1 THEN hy=hy-res:s 
oni=ioni*inso:inc r=hy+res:GOSUB 17 

14 IF INKEYCOKM THEN hy=hytresis 
oni=soni-inso:incr=hy-res:GOSUB 17 

15 ^ INKEY(S) 0-1 THEN GOSUB 29: GO 
SUB 34 

16 DENS:END 

17 • « SITUA CURSOR ELECCIONES PEN 

U » 

IS IF soni>260 T HEN son:=260 ELSE I 
F soni<100 THEN soni=100 
13 IF hy>=400 THEN hy-SSO:res=50:sw 
=C 

20 IF hy<8 THEN hy=i4:res=18 

21 IF sr-\ THEN 23 

22 IF hy <75 THEN hy= 50 :res= 18 :sw=l: 
GOTO 24 


23 IF hy= 50 +res THEN hy= 30 :res= 50 l 5 
w=0 

24 ORIGIN 0 , 0 , 0 , 639 , 339 ,OlPLOT 1 , 1 , 
CO:ORA'S 633,1 

25 PLOT - 10 ,- 10 ,cl 

26 TAG:MOVE 560 ,incr 1 PRINT CHRK 254 
)j:SOUND 2 ,soni , 4,7 

27 HOVE 560 ,hy:PRINT CHR$< 255 );:SOU 
NO 2 ,soni, 4,7 


28 TAGOFF:PLOT i,l,cO:DRAU 639,1:RE 
TURN 

29 ' « ELECCIONES MENU 4 » 

30 IF hy=14 THEN hyl=ll:GDTQ 99 

31 IF hy=32 THEN hyl=10:GOSUB 105 

32 IF hy=50 THEN hyl=S:GOSUB 113:CL 
EAR INPUT!GOSUB 387 

33 RETURN 

34 ' « MENU 1 » 

35 IF »en=1 THEN 36 ELSE 44 

36 IF hy=380 THEN c0=2:GOSUB 132:cO 
=0:INK 2,0,26:GOSUB 2881G0SUB 82:IN 
K 2,ti2:GOSUB 132:RE T URN 

37 IF hy=330 THEN c0=2:G0SUB 135:cO 
=0:INK 2,0,26:GOSUB 288:GOSUB 84:IN 
K 2,ti2:GQSU8 13S:RETURN 

33 IF hy=280 THEN cO=2:GOSUB 138:cO 
=0:INK 2,0,26:GOSUB 288:GOSUB 86:IN 
K 2,ti2:GOSUB 138:RETURN 

39 IF hy=230 THEN cO=2:GOSUB 14i:cO 
=0:INK 2,0,26:GOSUB 288:GOSUB 88:IN 
K 2,ti2:GOSUB 141 rRETURN 

40 IF hy=130 THEN c0=2:GOSUB I44:c0 
=0:INK 2,0,26:GOSUB 288:GOSUB 90:IN 
K 2,ti2:GOSUB I44:RETURN 

41 IF hy=130 THEN cO=2:GGSUE 147:cO 
=0:INK 2,0,26:GOSUB 288:G0SUB 92:IN 
K 2,ti2:GOSUB 14,7:RETURN 

42 IF hy=30 THEN c0=2:GOSUB 150:cO= 
OlINK 2,0,26:GOSUB 238:GOSUB 94:INK 

2,ti2:GOSUB ISO:RETURN 

43 GOTO 29 

44 ' « MENU 2 )> 

45 IF fnen=2 THEN 46 ELSE 54 

46 IF hy=380 THEN c0=2:GOSUB !6I:cO 
=0:INK 2,0,26:GOSUB 238:GOSUB 97:IN 
K 2■ ti2:GOSUB 161:RETUR.N 

4? IF hy=330 THEN cO=2:GDSUB 164;cO 
=0:INK 2,0,26:CLEAR INPUT:GOSUB 290 
:x1=x:y1=y:PLOT k 1,y1,cO:CALL 48818 
:CLEAR INPUT:GOSUB 312:INK 2,ti2:G0 
SUB 164:RETURN 

48 IF hy=280 THEN ;0=2:60SUB 167:cO 
=0:INK 2,0,26:CLEAR INPUT'.GOSUB 290 
:xl=x:yl=y:PLQT xI,yl,cO:CALL &BB13 
:CLEAR INPUT:56=2:GOSUB 321:INK 2,1 
i2:GOSUB S67:RETURN 

49 IF hy=230 THEN c0=2:G0SUB 170:cO 
=0:INK 2,0,26:CLEAR INPUT:GOSUB 290 
:xl=x:yl=y:PLOT xl ,yl,cO:CALL &BB18 
■.CLEAR INPUT:ic=12:60SUB 332:INK 2, 
ti2:GOSUB 170:RETURN 

50 IF hy=130 THEN c0=2:GOSUB 173:cO 
=0:INK 2,0,26:CLEAR INPUTlGOSUB 290 
:xl=x:yl=y:PLOT xl,yl,cO:CALL &BB13 
:CLEAR INPUT:ic=5:GOSUB 344: INK 2,t- 
i2:GOSUB 173:RETURN 

51 IF hy=130 THEN c0=2:G0SUB 176:cO 
=0:INK 2,0,26:CLEAR INPUT:GOSUB 290 
:xl=x:yl=y:PLDT xl,y1,cO:CALL 4BB18 
:CLEAR INPUT:se=6:G0SUB 321:INK 2,t 


i2:GOSUB 176:RETURN 

52 IF hy=8Q THEN cO=2:SOSUB 179:c0= 
o: INK 2,0,26:CLEAR INPUT'.GOSUB 290: 
xl=x:yl=y:PLOT xl,yl,cO:CALL 4BB1S: 
CLEAR INPUTIGQSUB 353:INK 2,ti2:G0S 
UB 179:RETURN 

53 GOTO 29 

54 ' « MENU 3 » 

55 IF nen=3 THEN 56 ELSE 67 

56 IF hy=3S0 THEN c0=2:G0SUB 185:cO 
=0:INK 2,0,26:CLEAR INPUT:GOSUB 290 
:xl=x:yl=y:PLOT xl,yl,cO:CALL JBBIS 
:CLEAR INPUT:GOSUB 365: INK 2, t-i2:G0 
SUB 185:RETURN 

57 IF hy=330 THEN cO=2:GOSUB 183:cO 
=0:INK 2,0,26:CLEAR INPUT:GOSUB 290 
:xl=x:yl=y:PLOT xl,y1,cO:CALL 4BB18 
:CLEAR INPUT:GOSUB 230:PLOT xl,yl,c 
0:DRAW x,y:INK 2,ti2:GQSUB 1S8:RETU 
RN 

58 IF hy=2S0 THEN t0=2:GOSUB 191:cO 
=0:INK 2,0,26:CLEAR INPUT:GOSUB 290 
:PLOT x,y,c0:INK 2,ti2:SGSUB !9!:RE 
TURN 

59 IF hy=230 THEN c0=2:a=200:b=250: 
GOSUB 65:INK 2,0,26:CLEAR INPUT:WHI 
LE INKEY$=":VEND:cO=i:GQSUB 65:cO= 
t i 0: c o i o r=T E 3 T {590, a+10): IN K 2, t i 2: 
RETURN 

60 IF hy=1 SO THEN c0=2:a=150:b=200: 
GOSUB 65:INK 2,0,26:CLEAR INPUT:WHI 
LE INKEY*=":WEND: cO=l:GOSUB 65:GOS 
UB 287:color s TEST(590,a+10):INK 2,1 
i2:RETURN 

61 IF hy=130 THEN cC=2:a=100:b=150: 
GOSUB 65:INK 2,0,26:CLEAR INPUT:UHI 
LE INKEY4="WEND:cO=l:GOSUB 65:GOS 
UB 237:colcr=TEST(590,a+10):INK 2,1 
i2:RETURN 

62 If hy=BO THEN cO=2:a=60:b=91:GOS 
UB 64:INK 2,0,26:CLEAR INPUT:GOSUB 
380:a=60:b=91:GOSUB 64:INK 2,li2:G0 
SUB 287:RETURN 

63 G0 T 0 29 

64 LOCATE 1,1’.PRINT CHR$<23):FOR i = 
a TO b STEP 2:?L0T 580,i,cO:DRAW S3 
3, i:NEXT:LOCATE 1,1:F’RINT CHR$(23)C 
HR*(0):RETURN 

65 ORIGIN 0,0:PL0 T 580,a,cO:DRAW 63 
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9,a,cO:ORAy 633,b,c0:DRAW SSO,b,tO: 
DRAM 530,a,cO:RETURN 

66 SOTO 29 

67 ' « MENU 4 » 

68 IF sien=4 THEN S3 ELSE 12 
63 IF hy=380 THEN 70 ELSE 74 

70 cO=2:LOCATE 1,1:PRINT CHRt(23):F 
OR jas=366 TO 380 STEP 2:PL0T 580,j 
as,cO:DRAW 633,jas:NEXT:LOCATE 1,1: 
PRINT CHF:$(23)CHR$(0) 

71 INK 2,0,26:GOSUB 288:c0=0:ORIGIN 
0,0,0,554,398,0:GRAPHICS PEN cOlMQ 

VE x,y;FILi color:ORIGIN 0,0,0,633, 
399,0 

72 c0=2:LOCATE 1,1:PRINT CHRI(23):F 
OR ®ur=366 TO 380 STE? 2:PL0T 530,n 
ur,cO:DRAW 639,SiurlNEXT:LOCATE 1,1: 
PRINT CHR$(23)CHR$(0) 

73 ORIGIN 0,0,0,639,393,0:c0=0;INtC 
2, ti 2:RETURN 

74 IF hy=330 THEN c0=2:a=318:b=330: 
GOSUB 64:INK 2,0,26:GOSUB 390:c0=2: 
a=3!8;b=330: GOSUB 64:cO=U0:RETURN 

75 IF hy=280 THEN c0=2:a=268:b=280: 
GOSUB 54:INK 2,0,26:SOSUB 420:c0=2: 
a=26S: b=280: GOSUB 64: c0=ti0: RETURN 

76 IF hy=230 THEN pregl="SALVAF:':GO 
SUB 232: ! REN, a$, "pppppppp. biri”: GOS'J 
S 241:GOSUB 287:GOSUB 25:RETURN 

77 IF hy=130 THEN preg$= B LEER":GOSU 
B 235:GOSUB 241:GOSUB' 287:GOSUB 25: 
RETURN 

73 IF hy=130 THEN SAVE"PRPPPPPP",b, 
fiCOQO,54000:ppeg$=*BCRRAR*:GOSUB 23 
5:1 ERA,at:a$="pppppppp"tGOSUB 241:! 
ERA,"pppppppp.bin":RETURN 
73 IF hy=80 THEN GOSUB 280:a=6S:b=6 
9: c=701d=71:e=72:f=73:c1=3:GOSUB 20 
5:a=62:b=74:c0=2:GOSUB 64:INK 2,0,2 
6:GOSUB 440:a=62:b=74:C0=2:GOSUB 64 
:GOSUB 276:a=63:b=63:c=70:d=71:e=72 
:f=73:cl.=3:G0SUB 205: GOSUB 287:RETV 
RN 

30 GOTO 12 

31 ' « DIBUJA PANTALLA ELECCIONES 
MENU 1 }) 

82 ' « DIBUJA CIRCULO » 

33 ORIGIN 0,0,0,554,338,0:DEG:F0R v 
u=0 TO 360 STEF 6:FL0T rhutSIM(vu)+ 



x,rho$COS(vu)+y, cO:DRAW rho*Slh(vu+ 
6)+x,rho$COS(vu+67 +y:NEXT:ORIGIN 0, 
0,0,639,399,0:RETURN 
84 ' « OIBUJA OVALO VERTICAL » 

35 ORIGIN 0,0,0,554,336,0:DEG:FOR v 
u=0 TO 360 STEP 6:PLOT rvetSIN(vu)+ 
x,rhotCOS(vu)+y,cO:DRAW rvetSIN(vu+ 
6)+x,rho4C0S(vu+6)+y:NEXT:ORIGIN 0, 
0,0,639,399,0:RETURN 

86 ' « DIBUJA OVALO HORIZONTAL » 

87 ORIGIN 0,0,0,554,398,0:DEG:F0R v 
u=0 TO 360 STEP 6:PLOT rhoiSINfvuH 
x,rve*COS(vii)+y,cO:DRAV rhotSIN(vu+ 
6)+x,rveiCOSCvu+6)+y:NEXT:ORIGIN 0, 
0,0,639,339,0:RETURN 

88 ' « DIBUJA CURVA » 

33 ORIGIN 0,0,0,554,338,0: DEG:FOR v 
u=270 TO 360 STEP 6:PL0T rho«IN(vu 
) , rhoJCOSX vu) +y, cO: ORAL 1 rholSINl v 
u+6) +x, rhoT-COS (vu+6) +y: NEXT : ORIGIN 
0,0,0,639,339,0: RETURN 
30 ' « DIBUJA R0M50 » 

91 ORIGIN 0,0,0,554,3-38,0:OEG:FOR v 
u=0 TO 360 STEP 90:PLOT rhotSINXvu) 
+x,rho*COS(yu)+y,cO:ORAy rhotSINfvu 
+90)+x rhotCOStvu+90!Ly:NEXT:ORIGIN 

0,0,0,639,393,0:RETURN 

92 ' « DIBUJA CUADRADO » 

33 ORIGIN 0,0,0,554,333, 0:DEG:F0R v 
u=45 TO 405 STEP 90:PLDT rhc4SIN(vu 
)+x, r ho^COSC vu)+y,c0: DRAW fhotSINXv 
u*90)*x,rhotCQS(vu+90)+y:NEXT:QRIGI 
N 0,0,0,633,399,0: RETURN 
94 ' « OIBUJA RECTANGULO HORIZONTA 
L » 

35 ORIGIN 0,0,0,554,358,0:DEG:FOR v 
u=45 TO 405 S T EP 90:PLOT rhotSINCvu 
)+x,rvetCOSXvu) +y,c0:DRAW fhksIN(v 
u+90) +x, rve3:CDS(vu+90)+y: NEXT: DRIGI 
N 0,0,0,623,339,0:RETURN 

96 ' « OIBUJA ELECCIONES MENU 2 » 
37 ' « OIBUJA REC T ANGULO VERTICAL 

» 

93 ORIGIN 0,0,0,554,338,0:DEG:FOR v 
u=45 TO 405 STEP 90:PLQT pvetSINXvu 
)+x,rho*CQ$(vu)+y,cO:DRAW rve*SIN(v 
u+30)+x,rho*COS(vu+30)+y:NEXT:ORIGI 
N 0,0,0,639,393,0:RETURN 

93 ' « CAMBIO A MENU SIGUIENTE » 

100 IF hyl <8 THEN RETURN 

101 IF hy 1=11 AND uen=l THEN D>en=2: 
GOTO 10 

102 IF by 1=11 AND ;»en=2 THEN men=3: 
GOTO 10 

103 IF hy1=11 AND raen=3 THEN »en=4: 
GOTO 10 

104 IF hyl=li ANO wen=4 THEN men=l: 
GOTO 10 

105 ' « CAMBIO A MENU ANTERIOR » 

106 IF hyl<8 THEN 111 


107 IF hyl=10 AND men=I THEN nen=4: 
GOTO 10 

108 IF hy1=10 AND men=2 THEN men=l: 
GOTO 10 

103 IF hy1=10 AND men=3 THEN men=2: 
GOTO 10 

110 IF hyl = 10 AND r;,en=4 THEN mer,=3: 
GOTO 10 
lit RETURN 

112 ' « EORRA PANTALLA » 

113 IF hyl=8 THEN CLS#2:GOSUB 130:G 
OSUB 17:RETURN 

114 ' << DIBUJA MENU 1 » 

115 CLSIl:GOSUB 122;GOSUB 132:GOSUB 
135:GOSUB 138:GOSUB 14!:G0SUB 144: 

GOSUB !47:GOSUB 150:GOSUB 153:RETUR 
N 

116 ' « DIBUJA MENU 2 » 

117 CLSftl:GOSUB 122:GOSUB 161:GOSUB 
164:GOSUB 167:GOSUB 170:60505 173: 



GOSUB 176:GOSUB 175: GOSUB IBSrETUR 
N 

118 " <( OIBUJA MENU 3 5) 

113 CLStll: GOSUB 122: GOSUB 185: GOSUB 
188:GOSUB 191:GOSUB 19C8QSU8 IBS: 
GOSUB 138:GOSUB 201:GOSUB 209:RETUR 
N 

120 ' « OIBUJA MENU 4 » 

12! CLSUl:GOSUB 122:GOSUB 213:GOSUB 
21S:GOSUB 217:GOSUB 219:GOSUB 221: 
GOSUB 223:GOSUB 225:GOSUB 228:RETUR 


Una de las 
pasibilidades 
es cunstruir 
pantallas de 
presentation 
o carteles 
gigantes. 


122 ' « CUAORICULA )> 

123 FOR d=580 TO 633:MOVE d,c1:DRAW 
d,399,c3:NEXT 

124 FOR a=0 TO 339 S T EP 50:MOVE 580 
, a: ORAL 1 639, a, cO: NEXT 

125 MOVE 1,1:DRAW 633,cG:DRAW 639,3 
39: DRAW 1,399: ORAL 1 1,1 

126 MOVE 580,1:DRAM 580,399 

127 FOR x=580 TO 633 STEP 2:MOVE x, 

1:DRAW x,SO,c0:NEXT 

128 FOR v=576 TO 580:MOVE v,1:DRAW 
v,393,cO:NEXT 

129 RETURN 
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130 HOVE l,l:DRAY 576,1,cO:DRAW 576 
,399:DRAW 1,399:DRAW 1,1:RETURN 

131 ' « MENU 1 » 

132 ' « CIRCULO MUESTRA » 

133 ORIGIN 609.5,375:DEG 

134 FOR x=0 TO 360 STEP 4S:PL0T 20* 
SIN(x),20^C0S(x),cO:DRAW 20*SIN(x+4 
5),20?C0S(x x 45):NEXT:SOSUB 159:RETU 
RN 

135 ' « OVALO HORIZONTAL MUESTRA > 

> 

136 ORIGIN 509.5,325:DEG 

137 FOR x=0 TO 360 S T EP 20:PLOT 16* 
SIN(x),22tC0S(x),cO:DRAW !6*SIN(x+2 
0), 22IC0S (x+20):NEXT:GOSUB 159:RETU 
RN 

138 ' « OVALO VERTICAL MUESTRA » 

139 ORIGIN 609.5,275:DEG 

140 FOR x=0 TO 350 STEP 20:PLOT 25* 
SINCx),16tC0S(x),cO:DRAW 25tSIN(x+2 
0), 16*C0S(x+20):NEXT:GDSUB 159:RETU 
RN 


153 ' « DECISIONES MENU 1 » 

154 GOSUB 251 

155 PLOT -10,-10,CIITAGIMOVE 586,48 
IPRINT CHR$(33)+CHR$(34)+CHR$(35); 

156 MOVE 586,32:PRINT CHR$(36)+CHRt 
(373 +CHR$(38)i 

157 HOVE 536,16IPRINT CHR*(39)+CHR$ 
(400 +CHR$(41);:TA60FF 

158 RETURN 

159 MOVE l,l:FILL ci:RETURN 

160 ' « MENU 2 » 

161 ' « RECTANGULO VERTICAL MUESTR 
A » 

162 ORIGIN 0,0 

163 PLOT 594,354, cO’.DRAY 624,354:DR 
AY 624,394:DRAW 594,334:DRAW 534,35 
4:0RIGIN 609,5,375:GOSUB 159:CRIGIN 
0,0:GOSUB 253:RETURN 

164 ' « LINEA FINA MUESTRA » 

165 ORIGIN 0,0 

166 PLOT 590,325,cO:DRAW 629,825:RE 
TURN 


U! ' « CURVA MUESTRA » 

142 ORIGIN 639,198:DEG 

143 PGR x=280 TO 350 STE° 8:PLOT SO 
'ISIN(x),SOtCOSCx),cO:DRAW SO*SIN(x+ 
S), 50t'CQS(»8): NEXT: RETURN 

144 * « RQKBO MUESTRA » 

145 ORIGIN 0,0 

145 PLOT 609.5,152:CRAY 636,175,cO: 
ORAV 639.5 136:DRAW S84,175:DRAU £0 
9.5,152:ORIGIN 603 5,175:SD3UE 159 1 
RETURN 

147 ' « CUADRAOO MUESTRA » 


167 ' « LINEA GRUESA MUESTRA >> 

163 ORIGIN 0,0 

169 FOR 1=274 TO 276 STEP 2:PL0T S9 
0,1,c0:DRAU 629,1:NEXT:RETURN 

170 ' « LINEA TRAZOS MUESTRA » 

171 ORIGIN 0,0 

172 FOR 1=583 TO 632 STEP 10:PL0T 1 
,225:DRAU 1+6,225,c0:NEXT:RETURN 

173 ' « LINEA PUNTOS MUESTRA » 

174 ORIGIN 0,0 

175 FOR 1=533 TO 632 STEP 4:PLOT I, 
176,cO:NEXT:RETURN 


Con el cuarto 
menu se 
pimUn 
rtalizar 
ropias, zoom, 
colorear 
zonas del 
dibujo y 
aumentar o 
disminuir el 
tamano. 


143 ORIGIN 0,0 

143 PLOT 594,110,cO:DRAY 625,110:DR 
A* 625,140:DRAY 594,140’.DRAY 594,1 1 
0:OR I GIN 603.5,1251GOSUB 159:RETURN 
ISO ' « RECTANGULO HORIZONTAL HUES 
Tfift » 

161 ORIGIN 0,0 

152 PLOT 584,60,cO’.DRAY 635,60:DRAY 
635130:DRAY 534,30:DRAY 584,50:OR! 
GIN 609.6,75:GOSUB 1S9:QSIGIN 0,0:R 
[TURN 



176 ' « LINEA OQBLE MUESTRA » 

177 ORIGIN 0,0 

173 PLOT 530,128,cO:DRAW 629,123:PL 
OT 530,1221 DRAY 629,122:RETURN 

179 ' « LINEA ZIG-ZAG MUESTRA » 

180 ORIGIN 0,0 

131 FOR 1=538 TO 624 STEP 3:PLQT 1, 
72, c 0:DRAU 1+4,76:ORflU 1+8,72:NEXT: 
RETURN 

182 ' « DECISIONES MENU 2 >> 

183 GOSUB 253:GOSUB 155:RETURN 

184 ' « MENU 3 » 

185 ' « LINEA EJES MUESTRA » 

186 ORIGIN 0,0 

137 FOR 1=583 T 0 618 STEP I4:PL0T ! 
,375,cO:PLDT 1+4,375:DRAY 1+10,375: 
NEXT:PLOT 630,375:RETURN 

138 ' « LINEA INCLINADfi MUESTRA » 

189 ORIGIN 0,0 

190 PLOT 590,310,cO:DRAY 623,340:RE 
TURN 

191 ' « PUNTO MUESTRA » 

192 ORIGIN 0,0 

193 PLOT 609.5,275,cOlRETURN 

194 ' « COLOR 1 MUESTRA )> 

135 ORIGIN 609.5,225:c 1=1GOSUB 159 
:GOSUB 200:RETURN 



136 ' (( COLOR 2 MUESTRA )> 

197 ORIGIN S09.5,175:c1=3:SOSUB 163 

:GOSUB 200:RETURN 

138 ' « COLOR 3 MUESTRA » 

199 ORIGIN 603.5,125:c1=0:GOSUB 159 
:GOSUB 200:RETURN 



200 c1=1:c3=3:C0=0:RETURN 

201 ' « VARIA COLOR MUES'RA » 

202 GCSU8 258 

203 ORIGIN 0,0 

204 FOR t=S80 TO 639:M0VE t,50:DRAY 
*,100,cO:NEXT:MOVE 580,52:DRAY 639 
,52,c1:DRAU 633,250:GRAY £80,250:DR 


:PLOT 580,200:DRAY 639,200:PLOT 580 
,ICO:DRAY 639,100:PLOT 580,252:DRAY 
639,252, cO: a=42:b=43:c=44:d=4S:e=4 
6:f=47 

205 TAGiPLOT -10,-10,cl 

206 MOVE 588,31:PRINT CHWa)+CHR$( 
b)+CHRS(c)| 

207 MOVE 586,75:PRINT CHRt(d)+Ch'Rt( 
e)+CHRt(f); 

203 TAGGFF:RETURN 

203 ' « DECISIONES MENU 3 » 

210 ORIGIN 0,0 

211 GOSUB 254:GOSUB 155:RETURN 

212 ' « MENU 4 » 

213 ' « FILL MUESTRA » 

214 ORIGIN 0,0:G08UB 260:Io=590:ha= 
380:sl=48:s2=49:s3=50:GOSUB 229:RET 
URN 

215 ' « ZOOM*- MUESTRA » 

216 ORIGIN 0,0:60SU8 262:lo=586:ha= 
330:s1=51:s2=52:s3=53:GOSUB 223:RET 
URN 

217 ' « COPIA MUESTRA » 



























































































































213 ORIGIN O.OlGDSUe 264: lo=5S6:ha= 
280:s1=65:s2=b6:s3=67:GOSUB 223:RET 
URN 

219 ' « SAVE MUE3TRA » 
m ORIGIN 0,0:GOSUB 268:!o=E86:ha= 
230:si=54:52=55:s3=5G:GOSUB 229:RET 
URN 

221 ' « LOAD HUE3TRA » 

222 ORIGIN 0,0:GOSUB 272:lo=S88:ha= 
130: a1=57: s2=58:53=59:GOSUB 223:RET 
URN 

223 ' « ERA nUESTRfi » 

22.1 ORIGIN O.OISOSUB 274:lo=S90:ha= 
132:sl=GO:s2=53:s3=S2:GOSUB 229:PE T 
URN 

225 ' « MAYOR / MES8R MVESTRA » 
225 ORIGIN 0,0:GOSUB 276:a=68:fc=6S: 
c=70:d=71:e=72:f=73:c1=3:SGSUS 205: 


245 SYMBOL AFTER 32 

246 SYMBOL 33,6X0,4X11100111,&X1001 
0101,6X11110101,6X10010101, Ml 11001 
11,6X0,6X0:SYMBOL 34,6X0,6X1111011, 
6X1001010,6X1111011,6X1010010,6X100 
1010,6X0,SXOISYMBGL 35,6X0,6X11001! 
00,6X1010010,6X11010010,6X10011110, 
6X1010010,6X0,6X0 

247 SYMBOL 36,6X0,6X1100100.5X10010 
110, & X10 01 ( 3101,6 X1 1 1 1010 0,6 X10 01010 
0,6X0,6X0:SYMBOL 37,6X0,6X1011101,6 
X100100!,6X1001001,5X11001001,6XT00 
1001,6X0,6X0:SYMBOL 38,6X0,6X11011! 
10,6X10010,6X10011110,6X10100,&X110 
10010,6X0,5X0 

248 SYMBOL 39.5X0,6X0,6X10001012,4X 
11011010,5X10101011,5X10001010,5X10 
00loll:SYMBOL 40,5X0,5X0,4X10100010 


c 1= 

:RETURN 

,4X110010,4X10101 

227 

' « DEC!STONES MENU 4 » 

010:RETURN 

228 

GOSUB 257:GOSUB 155:RETURN 

245 PEN 0 

229 

£ 

250 ' 

230 

TAG:PLOT -10,-10 c3 

251 SYMBOL 41,5X0 

w 

Lw L 

—— 

MOVE Io.ha:PR!NT CHRtlsl.HCHRK 

UM0100!, 5X101000 
tom 1: RETURN 



* *>T ** »T. * 

7 7 



mrai 


252 - 

253 SYMBOL 41 6X0,6X0,6X10101111,5X 
10100001,5X10100110,5X1010000!,6X11 
101111 5X0:RETURN 

25? ' 

255 SYMBOL ,6X0,6X0,6X10100001.6X 

loiooon,sxioiooioi,yicioiiii,ixii 

100001,6X0:fitTURN 

256 ' 

257 SYMBOL 523,60,60,6A6,&A2 5A2.6A 
2,5E7:RETURN 

253 ' « VAR IA COLOR SIMBOLOS » 


s2)+C,HRt(s3);: TAGOFF; RETURN 

232 ' « E7ECUTA SAVE » 

233 PLOT -10,-10,d:TAG:MOVE S5C,hy 
:PRINT CHRK5FE); 

234 GOSUB 287:SftVE'PPPPPPPP*,B,5200 
0,54000 

235 MODE 2:PAPER 0:FEN 1:BORDER 0: C 
LEAR INPUT 

235 SYMBOL «F T ER 32: !DIR,”DI3t. bn 

237 LOCATE SO,24:PR INI FREC*"]:” By 
ies libres.*:LOCATE i,24:PRINT CKRt 
(2)::PR1NT“-NUMERG DEL OTBUJC A 'ip 
reg$;" ???";: INPUT nusi 

238 b$=HIQ$(3TRt{nu«),2 ,LEN(STR$(ru 
»))) 

239 a$=“dib"+bt+'.Bir 

240 RETURN 

241 ' « EJECUTA LOAD » 

242 MODE 1:INK 0,0:INK 1,0:INK 2,0: 
INK 3,0:LOAD at 

243 GOSUB 287:GOSUB 244:GOSUB 282:3 
OSVB 387:RETURN 

244 ' « DEC ISI ONES SIMBOLOS » 


259 SYMBOL 12A,50.589,58A,18A,553,l 
52 522:SYMBOL 528,50,590,552,552,50 
C,552,452:SYMBOL 62C,60,638,6A4,6A4 
,SBC,5A4,6A4:SYMBOL 520,50,471,532, 
58A,482,58A,671:SYMBOL 52E,40,430,5 
51,451 551,451,490:SYMBOL 52F,60,6C 
E,622 529,52E,52A,5C9:RETURN 

260 ' « FILL SIMBOLOS }} 


2b! SYMBOL 530,SFF,56,-S7E,57E,SE,57 

E, 67E,6FF:SYMBOL 631,6FF,6DF,60F,6D 

F, 5DF,6DF,6C3,6FF:SYMBOL 532,&FF,47 
F,67F,67F,67F,67F 5 F ,SFF:RETURN 
2S2 ' « ZOOM+ SIMBOLOS » 

263 SYMBOL 533,5FF,5C,5E8,S0B.58B,5 
C,SFF,IFF!SYMBOL 534,5FF,5E6,5SA,4S 
A,S5A,6E6,SFF,SFF:SYMBOL 535,SFF,5E 
F, 540,5A8,5ED,4EF,SFF,SFF:RETURN 

264 ' « COPIA SIMBOLOS » 

265 SYMBOL 65,4X11111111,4X10001100 
,4X1111011,5X1111011,4X1111011,4X10 
001100,4X11111111,5X11111111 


266 SYMBOL 66,5X11111111,4X11000010 
,5X1011010,5X1000010,4X1011110,5X1! 
011110,6X11111111,6X11111111 


267 SYMBOL 67,6X1111111!,4X110011!! 
,5X101101!!,5X10110111,5X10000111,4 
X10110!01,4X11111111,4X11111!!1:RET 
URN 

268 ' « SAVE SIMBOLOS » 

263 SYMBOL 54,5X11111111,5X1110,4X1 
111101,5X1101,5X11101100 5X1101,5X1 
Ill!!!!,4X11111111:SYMBOL 55,4X111! 
11!!,5X1110111,5X10110111,6X1011101 
0,4X111010,5X10111101,5X11111111,5X 
1111111! 

270 SYMBOL 56,4X111111!!,4X1100001, 
6X1101111,6X11100011,6X11101111,6X1 
1100001,5X11111 111,5X111 111IIIRETUR 
N 

271 RETURN 

272 ' « LOAD SIMBOLOS » 

273 SYMBOL 533,SFF,57E,570,570,570. 
5E,SFF,ST:SYMBOL 43A,SFF,573,586,5 
36,5G0,575,SFF,SFF:SYMBOL 533,IFF,4 
C7,SOB,SOB,400,5C7,SFF,SFF:RETURN 

2 7 4 ' « ERA SIMBOLOS » 

275 SYMBOL 63C,6FF,56,67E,67E,6E,67 
I;,56,SFF:SYMBOL &30,5FF,S!£,5ED SED 
,41C,SEC,5ED,SFF:SYMBOL &3E,5FF,63F 
,SDF 5DP, 51F, SOF,40F,5FF:RETURN 

276 ' « MAYOR/MENDR 8IM30L0S » 

277 SYMBOL 68,4X11111111,5X11'0100, 
5X100101,5X1010100,5X1110101,5X1110 
101,6X11111111,5X111-11111: SYMBOL 55 
,5X11111111,5X1010110,4X1010101,5X1 
101101,5X1101101,5X1101110,6X111111 
11,5X11111111 

273 SYMBOL 70,5X11111111,5X1100001, 

5 X! 0101101,4 X10 i 0 0 0 01,5 X10101011,5 X 
1101101,5X11111111,5X11111111:SYMBO 
L 71,5X11111111,4X1110100,4X100101, 
5X1010100,4X1110101,5X1110100 4X111 
11111,5X11111111 

273 SYMBOL 72,6X11111111,6X1011011, 
4X11001010.5X11010010,4X11011010,4X 
1011011,5X11111111, SXHISIIIUSYMBQ 
L 73,5X11111111,5X110000,4X11010110 
,4X11010000,4X11010101,5X110110,SX! 
1111111,5X11111111:RETURN 
280 SYMBOL 71,4X11111111,5X1011,4X1 
111111,5X1011,5X11101011,5X1011,5X1 
1111111,SXlllllimSYMBOL 72,5X1110 
nil, 4X11011110,5X11111110,4X100011 


Con este 
programa se 
pueden 
mezclar 
curvas y 
rectos para 
conseguir 
todos los 
dibujos que 
imaginemos. 
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10,SX10101110,4X10001110,4X11111111 
,4X11111111 

231 SYMBOL 73,4X11111111,4X11011111 
,4X1011111,4X10010001,4X11010101,4X 
11010001,4X11111111,4Xllllllll:RETU 
RN 

282 ' « CURSOR ELECCIQNES SIMBGLOS 
)> 

283 SYMBOL 255,4X11111,4X1100111,4X 
1111001,4X6(11110,4X1111001,4X11001 
11,4X11111,4X11SU151;SYMB0L 4FE.4F 
F,4FF,4FF,4FF,4FF,4FF,4FF,4FF:RETUR 
N 

284 SYMBOL AFTER 32:PAPER OlFEU 1:E 
NO 

285 IF ER.R=7 OR tRR=S T HEN SOTO 428 
ELSE SYMBOL A C TER 32:INK 0,0:INK 1 
,26:PAPER 0:PEN llPRINT'ERRCR *iERR 
i'EL LA LINES *iERL:STOP 

286 ' « SITUA LAPIZ » 



Con las mentis 1J 3 sc jnteJcn elegir una 
) varios tipos dc colons. 


v Cl u dr formas gcomctricos, Ins esencinles. 


287 c0=0:c1=1 :e2=2:c 3=3:INK cO,tiO: 

314 WHILE NOT INKEY(47H>-1 

UB 305:GOS 

UB 343 

INK d,til:INK c2,ti2:INK c3,ti3:80 

315 IF INKEY<0><>-l THEN y=y+32;G0S 

339 FQR ir 

1 TO 1 CO:NEXT:WEND:RETURN 

ROER ii3:RETURN 

UB 305:GOSUB 320:GOTO 319 



238 ' 

316 I c INKEYt2)0-1 T HEN y=y-?2:GCS 

340 PLOT x 

,y-(ic/2) c0:DRAW x,y:RET 

289 ' 

UB SOS:GOSUB 320:GOTO 319 

URN 

290 CLEAR INPUT:ORIGIN 0,0:x=320:y= 

317 IF INKEYC)0-1 THEN x=x+32:GGS 

34! PLOT x 

,y+Cic/2),cO:QRAW x,y!RET 

200:c0=2:INK c2,0,2S:F9R t=l TO 100 

UB 305:GOSUB 320:GOTO 319 

URN 

:CLEAR INPUT:NEXT 

318 IF INKEYC3)<>-1 THEN x=x-32:6QS 

o * n pi fit v 

f Lu i A 

-(ic/2) y,cO:DRAW x,y:RET 

291 WHILE NOT 1NKEYU7KM 

UB 305:GOSUB 320 

URN 

292 If INKEY(0)0-1 T HEN yp=y;y=y+6 

313 FOR 1=1 TO 100:NEXT:WEND:RETURN 

343 PLOT x 

+(ic/2),y,tO:DRAt >:,y:RET 


IGQSU 8 305: SQS’JE 239: GOTO Til 
253 IF INKEV62?0-1 THEN yp=y:y=y -6 
:60S‘JB 305: GQSUB 295: GOTO 237 

234 IF MEY( 1)0-1 THEN xp=x:x=x +6 
;SOSOS 305:GQSUB 299:GOTO 297 

235 IF INKEYC 8 )<•}-! T HEN xp=xIx=x -6 
:GQSUB 305:50303 299:6070 237 

296 a=TEST(x,y):WHILE INKEY$=**:PL0 
T t0: L JEND:PL0T x,y,a 
237 WEMD 

298 cC^O: GQSUB 287: INK c2, O', 26:SET’J 
RN 

299 ' « DIBUJA LAPIZ » 

300 byte=TESTCx,y):bytss=TEST(xp,yp 


320 ORAV x.y.cO:RETURN 

321 ' « EJECUTA UNEAS 008LES » 

322 ORIGIN 0,0:x=xl:y=y1:PLOT x,y,c 
0:PLOT x+5&,y,c0:CLEAR INPUT 

323 WHILE NOT INKEY(47K>-1 

324 a=x:b=y 

325 IF INKEY(O)0-1 THEN y=y+16:GGS 
UB 305:S03U8 330:GOTO 323 

325 IF 1NKEY(2)<>-1 THEN y=y-!6:GCS 
UB 305:GOSUB 330:GOTO 329 

327 IF INKEY(1)0-1 THEN x=x+16:G0S 
UB 305:GOSUB 331:GOTO 323 

328 IF INKEYC8) 0-1 THEN x=x-16:G0S 
UB 205:GOSUB 331:SOTO 329 

329 FOR 1=1 TO 100:NEXT:VEND:RETURN 


URN 

344 ’ « EJECUTA LINEAR A PUNT-OS )'■ 

345 ORIGIN 0,0:x=x!:y=yi:PLOT x,y,£ 
0:CLEAR INPUT 

346 WHILE NOT INKEYU7XM 

347 IF IMKEY(O)0-1 THEN y=y+S:SO£U 
B 305:GQSUB 3S2:G0TQ 35! 

348 IF INKEYC2HH THEN y=y-5:E0SU 

e 80S:gosub 352 :goto 351 

349 IF INKEYt 1)0-1 THEN x=x+6:S0SU 
E 305:GOSUB 352:GOTO 351 

350 IF !NKEY!8)<>-1 THEN x=x-6:30SU 
B 395:GOSUB 352 

351 FOR t=l TO 75:NEXT:WEND:RETURN 


301 PLOT xp,yp,byies 

302 PLOT x.y.cO 

302 FOR p=l TO 40:NEXT:PLOT x.y.byt 
6 

304 RETURN 

305 ' « TOPES » 

306 IF y>=398 OR y<=0 OR x)=5S4 OP 
x<=0 THEN LOCATE I,1:P.RINT CHRK7) 

307 IF y>=398 THEN y=39b 

308 IF y<=G THEN y=2 

309 IF x>=554 THEN x=SS2 

310 IF x<=0 THEN x=2 

311 RETURN 

312 ' « EJECUTA LINEfiS » 

313 ORIGIN 0,0:x=xl:y=yl:PLOT x.y.c 
0:CLEAR INPUT 


330 PLOT a,D,cO:DRAW x,y,cO:PLOT a+ 
56,b,c0:DRAW x+5c,y,cO:RETURN 

331 PLOT a,b,c0:DRAW x.y,cO:FLOT a, 
b-se, CO: DRAW xv-se, c 01 RETURN 

332 ' « EJECUTA LINEAS A TRAZCS » 

333 ORIGIN 0,0:x=xi:y=y1:PLOT x,y,c 
0:CLEAR INPUT 

334 WHILE NCI INKEY(47!0-1 

335 IF INKEYC0)0-1 THEN y=y+ic:GOS 
UB 305: GOSUB 340:GOTO 333 

336 IF INKEY(2)0-1 THEN y=y-k:GQS 
UB 305:GOSUB 341:GOTO 339 

337 IF INKEYt 1)0-1 THEN x=x+it:GOS 
UB 305:GOSUB 342:GOTO 339 

338 IF INKEY(8)0-1 THEN x=x-ir:60S 


352 PLOT x,y,c0:RETURN 

353 ' « EJECUTA LINEAS A ZIG-ZAG ) 

> 

354 ORIGIN 0,0:x=xi:y=y1:PLOT x.y.c 
0:CLEAR INPUT 

355 WHILE NOT INKEY(47)0-1 

356 IF INKEY(O)<>-i THEN y=y+12:G0S 
UB 305:GOSUB 361:GOTO 360 

357 IF INKEY(2)0-1 THEN y=y-12:G0S 
UB 305:GOSUB 362:GOTO 360 

353 IF !NKEY(i)0-l THEN x=x+12:G8S 
UB 305:GOSUB 363:GOTO 360 

359 IF INKEY(8)0-1 THEN x=x-12:G0S 
UB 305:GOSUB 364 

360 FOR t=l TO 75:NEXT;WEND:RETURN 

361 PLOT x,y-12,cO:DRAW x-6,y-6:0RA 
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il x,y:RETURN 

362 PLOT x,y+12,cO:DRAW x-6,y+6:0RA 
a x,y:RETURN 

363 PLOT x-12,y,c0:DRAW x-6,y-6:DRA 
a x,y:RETURN 

364 PLOT x+12,y,cO:DRAW x+6,y-6:0RA 
W x.y:RETURN 

365 ' « EJECUTA LINEAS A EJES » 

366 ORIGIN 0,Q:x=xl:y=yl:PL0T x,y,c 
OrCLEAR INPUT 

367 WHILE NOT INKEYU7KM 

363 IF INKEY<0)0-1 THEN y=y+16:SDS 
UB 305:GOSUB 373:GOTO 372 
363 IF INKEY(2)0-1 THEN y=y-16:G0S 
UB 305:GOSUB 374:GOTO 372 

370 IF INKEY(l)<>-! THEN x=x+16:GGS 
UB 305:GOSUB 375:GOTO 372 

371 IF I NKEY (3) 0-1 THEN x=>:-16:G0S 
UB 305:GOSUB 376 

372 FOR t=I TO 75:NEXT:WEND:RETURN 

373 PLOT x,y-16,cO:PLOT x f y-12:DRAV 
x,y-4:PLOT x,y:RETURN 

374 PLD T x,y+16,cO:PLOT x,y+12:0RAW 
x,y+4:PLOT x.y:RETURN 

375 PLOT x-16,y,cO:PLOT x-12,y:DRAW 
x-4,y:PLOT x.y:RETURN 

376 PLOT x+1S,y,cO:PLOT x+12,y:DRAW 
xM,y:PLOT x.y:RETURN 

377 ' « EJECUTA LINEAS INCLINADAS 

» 

378 ORIGIN 0,0:x=320:y=200:PLOT x,y 
,cC:CLEAR INPUT 

373 WHILE NOT INKEYX47)0-1 
380 ' « EJECUTA VARIACIGN DE COLOR 
» 

38! CALL &B818:CLEAR INPUT 

382 WHILE NOT INKEY<47)<>-1 

383 tl=INT!RNDJ26):INK c!.il;til=U 

384 t2=INT(RN0J26):INK c0,l2:ti0=t2 

385 t3= INT(RND4-26):INK c3,t3:ti3=t3 
:BOROER ti3:bo=ti3 

336 CALL &BB18:VEND:RETURN 

387 WINDOWS!.37,40,1,25:PAPERttl,c3: 

PEN#1,c0:UIND0W#2,1,36,1,25:PAPERi2 

, c 1: F'EN#2, cO: RETURN 

383 IF rho>=200 THEN rho=200 ELSE I 

F rho<=10 THEN rho=10 


383 rve=rho/2:RETURN 

390 * « EJECUTA ZOOM+ » 

391 ORIGIN 0,0:x=320:y=200:CLEAR IN 
PUT:GOSUB 393:GOSUB 400:G0SUB 402:G 
OSUB 403 

392 RETURN 

393 WHILE NOT INKEYX47)0-1 

394 IF I NKEY (0)0-1 THEN yp=y:y=y+6 
:GOSUB 413:GOSUB 299:GOTO 399 

395 IF INKEYI250-1 THEN yp=y:y=y-6 
:GOSUB 413:GOSUB 299:G0T0 399 

396 IF INKEYC 1)0-1 THEN xp=y:x=x+b 
:GOSUB 413:GOSUB 239:G0T0 399 

397 IF I NKEY (8)0-1 THEN xp=y;x=x-S 
:GOSUB 413:GOSUB 299:GOTO 399 

338 a=TE3T<x,y): WHILE INKEYt=”-‘ l :PLO 
T x,y,cO:WEND:PLOT x,y,a 
393 WEND:RETURN 

400 ' « VENTANA » 

401 PLOT x-63,y-49,cO:DRAW x+72,y-4 
9:0RAW :<+72,y+54:DRAW x-S3,y+54:DRA 
U x-68,y-49:RETURN 

402 ch=0:Dirt pis$(70):ORIGIN x-66,y 
-46:FOR hi=0 TO 137 STEP 2:ch=ch+l:F 
OR v=0 TO 10! :pis$(ch)=pist(:h!+ST 
R$(TEST(h,v)):NEXT v,h:RETURN 

403 ' 

404 ORIGIN 0,0:h=0 

405 FOR ch=l TO 63 

406 FOR gm=l TO 8 STEP 2::h=h+2 

407 v-2 

408 C 0R 1=2 TO LEN(pibKch)) S T EP 2 
403 FOR c ad=l TO 4 STEP 2 

410 PLOT h,v,‘VALCMIQ$Cpis$(ch),I,!) 

) 

411 v=v+2 

412 NEXT cad,I,gm,ch:ERASE pis$:GOS 
UB 287:PLOT 2,393:DRAW 633,398,cO:R 
ETURN 

413 ' 

414 IF y)=344 OR y<=43 OR x>=482 OR 
x<=68 THEN LOCATE 1,1:PRIN' r CHR$(7 

1 

415 IF y>=344 THEN y=342 

416 IF y(=49 THEN y=51 

417 IF x>=482 THEN x=430 

418 IF x<=68 T HEN x=70 


413 RETURN 

420 * « OUPLICA 0I8UJ0 » 

421 ORIGIN 0,0:x=320:y=200:CLEAR IN 
PUT:GOSUB 393 

422 ORIGIN x-68,y-43:FOR h=0 TO 134 
STEP 2 

423 FOR v=0 TO 103 

424 IF h+140>=552-(x-68) THEN 426 

425 PLOT h+140,v,TEST< h,v) 

426 PLOT h,v+!02,TESTCh,v):PLOT h,v 
-103,TEST(h,v):PLOT h-140,v,TESTIh, 
v):NEXT v,hEORIGIN 0,0:RETURN 

427 ■' « TRATAHIENTO DE ERRORES » 
423 POKE 124,men:POKE 125,bo:POKE 1 
26,pa:POKE !27,tiO: C ’CKE !28,til:P0K 
E 129,ti2:POKE 130,ti3:POKE 131, cO: 
POKE 132, e 1: POKE 13?., c 2: POKE 134, c 3 
:POKE 135,inso:POKE 135,color:POKE 
137,rho:POKE 138,rve:P0KE 139,res:P 
OKE 140,sw 

429 IF y)=255 THEN y=y-255:P3KE 143 
,y:POKE 144,,255:GOTO 431 

430 POKE 143,y:POKE 144,0 

431 IF soni>=255 THEN 50iii=son:-25E 
.’POKE 145,soni:POKE 146,255:GC T Q 43 

432 POKE 145,soni:POKE 146,0 

433 IF incr>=255 THEN Incr=in«r-2S5 
: p OKE 147,incr:POKE 148,255:30~D 43 
S 

434 POKE 147,incr:POKE 143,0 

435 IF hy>255 THEN hy=hy-255: POKE 1 
49,hy:POKE 150,265:GOTO 437 

436 POKE 149,hy:POKE 150,0 

437 CLEAR 

438 sep=PEEK( 124):bo=FEEK( 125):pa=F 
EEKf126):tiO=PEEK(127):ti1=PEEK(128 
):ti2=PE£K(129)Iti3=PEEK(130):cO=PE 
EK(13D: c 1=PEEK( 132): c2=PEEK<133): t 
3=PEEK(134):inso=PEEK(135):oo3or=FE 
EKC136):rhc=PEEK(137):m=PEEK(138) 

: res=PEEK(139):sw=PEEK(34C) 

439 y=PEEKil43)+PEEK(144):s:ni=PEEf' 

(14S)+PEEK( 146) :incr=?EEK(U7) + fEEi; 

(148):hy=PEEK( 149)+PEEKC 1 SO):FOR ;.= 
124 TO 150:POKE p,0:NEXT:x=320:c0=0 
:INK 0,0:GOTO 7 

440 - M MAYOR / MENQR » 

441 PEN 0 

442 v$=INKEY$:IF UPPERS vt)0'S" AN 
D vPPER$(y$)0"N" OR v$=” THEN 442 

443 IF UPPER$(v$)="S" THEN rho=rho+ 
20:rve=rho/2:GOSUB 446:RETURN 

444 IF UPPER*(v$)=*N’ THEN rho=rho- 
20:rve=rho/2:GOSUB 446:RETURN 

445 ' « TOPES MAYOR/MENOR » 

446 IF rho)=200 THEN rho=200:rve=rh 
o/2:RETURN 

447 IF rho<=10 THEN rho=10:rve=rho/ 
2:RETURN 

443 RETURN 
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FILL 


'OOM- 


SflVE 

i-OSO 

EF.ht 

MRVCR 

MEMOS 


























CRAY 5 


Lo imposible ha ocurrido: Un asteroide ha 
averiado al superordenador CRAY 5 que 
controla el generador atmosferico de la co- 
Ionia. Sin tu ayuda miles de personas estan 
condenadas. .AYUDALAS! 


V 




...YA HEMOS SI 
DE LA MADRIGl 


/ \ 


COLT 36 




IMPORT ANTE 


CADA JUEGO INCLUYE 
UNA PEGATINA, 
f; REPRODUCCION 
EXACTA DEL DIBUJO 
DE PORTADA 


SumArgete en el Viejo Oeste y lucha contra 
bandoleros y tribus indies en defensa de la 
ley. Sole 61 mis rapido podra sobrevivir en^^^ 
este juego que por graficos y sonido puede 
calificarse como el mejor irograma del Oeste 
en MSX. jDESENFUNDATORASTERO! 

v j \ 7 . 


UNO TE LO PIERDASM 


V 

/ 


> 1 / s IV 

DISTRIBUIDOR EXCLUSIVO PARA ESPANA: 

VERB0lfiOFT^ARE. CL INtWi'^EZ wCRGADO/1 - 2803 ■ 
tDELEGACIONBARC^.ONA. C/. VILADOMAT, 114-nR 















Y TE SALIMOS BARATOS 


SPIRITS 


o'g E ® 

























































x 3*mmi/m£/7 


^inves PC 


DUIIIDC 


HIT 3IT SONY 


Ventas al mayor 


G/SA 


Comercio, 11 - tel. 319 93 08 Barcelona 




Estableclmlentos recomendados: BAZAR DELHI Reina Cristina, 11 Barcelona - INTERJOYA 
Relna Cristina, 9 Barcelona - BAZAR TAIWAN Plza. Palaclo, 19 (galenas) Barcelona - LOS 
GUERRILLEROS Isias Canarias, 128 Valencia - BAZAR DELHI M. Ruano, 5 Lleida, 


en R G/SA 

tenemos mejor precio 
con total garantia, 


Si definitivo, nadie como REGISA puede dar 
una oferia economica tan favorable, ni una 
gama tan amplia de las mejjores marcas en 
monitores, ordenadores, impresoras, 
unidades de disco, perifericos, software, etc. 
Pero ademas del mejor precio, tambien damos 
la mayor garantia a todas nuestras ventas. 
Por esto REGISA es mejor precio con total 


■ 






































